Tema: Lectura de archivos

Hola, hace mucho tiempo q no programo VB, y ahora q vuelvo veo ya hay version 2008, y muy cambiada por cierto, bueno la cuestion es q llevo mas de 6 horas de intentos y de investigacion aun no puedo hacer que se cargue un archivo en memoria, el archivo son muchas lineas con este "formato"

Código:

Archivo:
01 05 67 34
07 87 32 34
##....(sigue asi hasta los 1000 registros)

El procedimiento que he logrado armar es este, aunque la conversion es donde siempre he fallado,

Código:

  Sub leer()
    Dim a As Integer = 0
    Dim line(3) As String, auxiliar As String
    TextBox3.Text = "Inicio de sistema" + vbNewLine
    Try
      Using sr As StreamReader = New StreamReader("TestFile.txt")
        For a = 0 To 0
          line(a) = sr.ReadLine()
          auxiliar = Mid(line(a), 1, 2)
          historial(a).b1 = Int32.Parse(auxiliar)
          TextBox3.Text += line(a) + vbNewLine
          TextBox3.Text += auxiliar + vbNewLine
          TextBox3.Text += historial(a).b1 + vbNewLine
          TextBox3.Text += vbNewLine
          a = a + 1
        Next
        sr.Close()
      End Using
    Catch exept As Exception
      TextBox3.Text = "The file could not be read:"
      TextBox3.Text = exept.Message
    End Try

  End Sub

Alquien me podria ayudar con el codigo?, de antemano gracias