Either put this in a a open buttons click event or do it when the form loads:
Open “C:\path_to_your_file\file_name.txt” For Input as #1
Put this in your next buttons event:
Dim temp as String
Dim data() As String
Do While Eof(1) = 0
line input #1,temp
data = Split(line, ",")
TextBox1.Text = data
TextBox2.Text = data
Either put this in a close buttons event or put it in your form close event.
You will need to add error handling. If one line of the file doesn’t contain two elements this code will throw an exception. Wrap the assignments of the text boxes in an if statement that check to make sure the data array has the correct number of elements.