If Not File.Exists("c:\test.txt") Then
Console.WriteLine("{0} does not exist.", "c:\test.txt")
Return
End If
Dim sr As StreamReader = File.OpenText("c:\test.txt")
Dim input As String
input = sr.ReadLine()
'While Not input Is Nothing
Do
Console.WriteLine(input)
input = sr.ReadLine()
TextBox1.Text = TextBox1.Text & input
'End While
Loop Until input Is Nothing
Console.WriteLine("The end of the stream has been reached.")
sr.Close()

我想读取文本文件里的两部内容，这段哪里有错啊，（全部内容共两行）。Textbox控件赋值是最后一行的内容，怎么才能把第一行的内容也读出来啊。望指教