How to read text file line by line?

[.paul.]

try this:

dim lblCounter as integer = 1
 
Do while srFileReader.peek <> -1
    'this will ouput text to label1, label2...etc
    me.controls("Label" & lblCounter.tostring).text = sInputLine
    lblCounter += 1
    System.Console.WriteLine(sInputLine)
    sInputLine = srFileReader.ReadLine()
 
Loop

[J-Deezy]

@ paul you might want to check if the form actually contains a label of that name just in case. Also, using/endusing for streamreaders are a lot easier

Using sRead As New IO.StreamReader("D:\Users\Arben\Desktop\SerieA.txt")
      Dim thisLine as string = ""
      Dim nLabel as Integer = 0
      Do Until sRead.EndOfStream
          thisLine = sRead.ReadLine
          if Me.Controls.ContainsKey("Label" & nLabel) then
               Me.Controls("Label" & nLabel).Text = thisLine
          End if
          nLabel += 1
       Loop
End using