如何从文本文件中读取数据并在其他文本框中拆分?

时间:2015-08-31 09:52:45

标签: vb.net

我可以使用VB中的readalltext函数读取文本文件(* .txt)中的所有文本,但我想将文本拆分为其他文本框,一个文本文件包含数据,我想将其拆分,我的文本文件是下一个:

x=first name
y=last name
z=age

我想要的代码可以管理来自该文本文件的读取数据,然后在三个文本框中分割数据。

textbox1.text=x
textbox2.text=y
textbox3.text=z

并且最后一次输出是

textbox1.text=first name
textbox2.text=last name
textbox3.text=age

所以我的问题是下一个:我想要的代码可以从一个文本文件中读取x,y和z值。

2 个答案:

答案 0 :(得分:2)

以下是代码示例:

For Each line In File.ReadAllLines(file)
    Select Case True
        Case line.StartsWith("x=")
            TextBox1.Text = line.Split("=")(1)
        Case line.StartsWith("y=")
            TextBox2.Text = line.Split("=")(1)
        Case line.StartsWith("z=")
            TextBox3.Text = line.Split("=")(1)
    End Select
Next

答案 1 :(得分:2)

考虑将内容加载到List(Of String())

Dim lst = File.ReadAllLines("filename.txt").Select(Function(line) line.Split("=")).ToList

然后,如果您将文本框存储在List(Of TextBox)中,则可以相应地填充相应的文本框:

For i = 0 To lst.Count
    textboxes(i).Text = lst(i)(1)
Next