Dim lines() As String = IO.File.ReadAllLines("C:\test.txt")
        TextBox1.Text = lines(0)
        TextBox2.Text = lines(1)
        TextBox3.Text = lines(2)

Those people who think they know everything are a great annoyance to those of us who do - Isaac Asimov