Vb.net Vb：文本文件中的只读第1行

我使用的是一个文件阅读器，它根据txt文件在文本框中显示选项。 但是，我想让它按行显示每个选项，而不是按字符串长度，因为每次都会添加不同的选项。如何用第1行、第2行等替换

子字符串

我的代码：

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    TextBox1.Text = System.IO.File.ReadAllText("C:\Users\user1\Dekstop\select.txt").Substring(0, 20)
    TextBox2.Text = System.IO.File.ReadAllText("C:\Users\user1\Desktop\select.txt").Substring(22, 23)
    TextBox3.Text = System.IO.File.ReadAllText("C:\Users\user1\Desktop\select.txt").Substring(45, 12)
End Sub

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
    Form1.txtServer.Text = TextBox1.Text
    Me.Close()
End Sub

其他文本框也是如此。

读取文件的所有行并将它们放入数组中

Dim lines = System.IO.File.ReadAllLines("C:\Users\user1\Dekstop\select.txt")
TextBox1.Text = lines(0)
TextBox2.Text = lines(1)
TextBox3.Text = lines(2)

读取文件的所有行并将它们放入数组中

Dim lines = System.IO.File.ReadAllLines("C:\Users\user1\Dekstop\select.txt")
TextBox1.Text = lines(0)
TextBox2.Text = lines(1)
TextBox3.Text = lines(2)