vb.net 逐行读取文件并复制部分行

Question

我有这段代码来读取文件 (16file) 的行，然后在文本框 (tWLine) 中显示每一行，一次一个，但下面的代码一次显示文件的所有内容.但是我希望它在读取一行文件后显示在文本框 (tWline) 中，然后在读取下一行之前单击一个按钮并再次显示在文本框中，直到 16 文件中的最后一行。

第二部分将根据行中单词的数量将读取的行中的单词复制到文本框中（第一个单词复制到 txt1，第二个复制到 txt2，等等）但我将非常感激至少要单独完成第一部分。

    `Dim fRdr As StreamReader

    fRdr = File.OpenText("C:\users\skfile.txt")

    'Loop through to read Lines
    Do Until fRdr.EndOfStream
        tWLine.Text = tWLine.Text & fRdr.ReadLine & vbCrLf
    Loop
    fRdr.Close()`

我希望文本框的内容像下面的代码那样一次显示一行消息，这样在 tWline 文本框中显示每一行之后，将在读取下一行之前执行某种形式的代码然后对下一行执行相同的操作，直到到达文件中的最后一行。

    `Private Sub bReadFA_Click(sender As Object, e As EventArgs) Handles bReadFA.Click
    For Each Line As String In File.ReadLines("C:\users\skfile.txt")
        MsgBox(line)
    Next
End Sub `

Answer 1

你的意思是在文本框中传输文件的每一行？试试这个

将Msgbox(line)更改为YourTextbox.Text = line

试试这个

Private Sub bReadFA_Click(sender As Object, e As EventArgs) Handles bReadFA.Click
For Each Line As String In File.ReadLines("C:\users\skfile.txt")
YourTextbox.Text = line
await Task.Delay(1000)//Await a second
Next

Answer 2

如果影魔的回答对您不起作用，那么您的文本文件中可能没有多行。如果你的意思是说行，那么你最好将文件中的所有文本复制到一个字符串变量中，然后用“。”拆分它。获取字符串数组。然后简单地做你想要的阵列。

vb.net 逐行读取文件并复制部分行

vb.net read file line by line and copy some part of the Line

vb.net

loops

for-loop

readline

streamreader