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