Question

我从文本文件中获取数据如下：

KILL
  MAD
  JOG
    士

根据以上数据，我想在文本框1中放置文本“Kill”，在文本框2中放置文本“MAD”，在文本框3中放置文本“JOG”，在文本框4中放置“JUG”
以下截图为 Click Here

那么，任何人都可以帮助我吗？

Answer 1

Dim lines = File.ReadAllLines(path)
TextBox1.Text = lines.ElementAtOrDefault(0)
TextBox2.Text = lines.ElementAtOrDefault(1)
TextBox3.Text = lines.ElementAtOrDefault(2)
TextBox4.Text = lines.ElementAtOrDefault(3)

您也可以使用数组的索引器（f.e. lines(0)）而不是ElementAtOrDefault。但后者的优点是，如果元素较少，它不会抛出异常。

但是，我会使用ListBox代替TextBox代替Multiline=true：

TextBox1.Lines = File.ReadAllLines(path)

Answer 2

尝试在存储在文件中的值之间放置一个分隔符，然后您可以按如下方式读取它：

Dim fileReader As String
fileReader = My.Computer.FileSystem.ReadAllText("C:\test.txt")

Dim strArray() as String = fileReader .Split("|") 'change the | by your separator

TextBox1.Text = strArray(0)
TextBox2.Text = strArray(1)
TextBox3.Text = strArray(2)

从文件中读取文本并将其放在vb.net中的TextBox中

2 个答案: