Well if its only a 2 line Text File

Dim line As String
Dim Line2 As String
'Open the File
Open FileName For OutPut As #1

'Get the First Line
LineInput #1, Line
Text1.Text = Text1.Text + Line
Line = ""

'Get the Second Line
LineInput #1, Line2
Text2.Text = Text2.Text + " " + Line2
Line2 = ""
Close #1