Ayuda con ListBox

[Sirius381]

haber, ya intente poniendo el codigo asi:

Private Sub Command1_Click()
For a = 1 To 2
datos = (matricula + nombre + apellido)
matricula = InputBox("dame matricula" & i)
nombre = InputBox("dame nombre" & i)
apellido = InputBox("dame apellido" & i)
Text1.Text = datos
Next a
End Sub

Private Sub Form_Load()
Dim datos(1 To 2, 1 To 3) As Integer, matricula As Integer, nombre As Integer, apellido As Integer, a As Integer

End Sub

pero la textbox me presenta la info solo del primer ciclo, es decir, si meto en el primero:

Matricula1.-123
nombre1.- juan
apellido1.-perez

matricula2.-456
nombre2.-jose
apellido2.- lopez

solo pone en la text box:

123juanperez

y no asi como necesito:

123 juan perez
456 jose lopez

eso en un ciclo de 2 vueltas, ya no puedo mas, ya son 7 dias de intentos y estoy convenciendome de que no doy mas... ojala y alguien pueda ayudarme, muchas gracias...

saludos!!