راهنمایی خط به خط خواندن اطلاعات

کد HTML:

If System.IO.File.Exists(TextBox5.Text) = True Then

            Dim objReader As New System.IO.StreamReader(TextBox5.Text)

            Do While objReader.Peek() <> -1

                TextLine = objReader.ReadLine() & vbNewLine
                Readtex = TextLine

            Loop
        End If
        Label1.Text = Label1.Text + 1
        If Label1.Text = "1" Then
            TextBox1.Text = Readtex
        End If
        If Label1.Text = "2" Then
            TextBox3.Text = Readtex
        End If
        If Label1.Text = "3" Then
            TextBox4.Text = Readtex
        End If
        If Label1.Text = "4" Then
            TextBox6.Text = Readtex
        End If