我可以使用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值。
答案 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