Visual Basic - por que pasa esto?

hola amigos
les explico mi problema resulta que tengo un listbox un form.el cual me lee una base de datos que tengo en access.
resulta que a medida que se va alineando a sia abajo se desordena todo no queda aliniado como el primer ingreso que pasa les mando el codigo por si me pueden ayudar
Private Sub Form_Load()

'Abre la base de datos de Access
Dim Base As Database
Dim Buscar As Recordset
Set Base = OpenDatabase("E:\bd1.mdb")
Set Buscar = Base.OpenRecordset("fichass")
'Abre las columnas seleccionada
With Buscar
.MoveFirst
Do While .EOF = False
List1.AddItem ![nombre1] & " " & ![rut] & " " & ![entrada] & " " & ![Salida] & " " & ![planificada] & " " & ![profesional]
.MoveNext
Loop
End With

End Sub

Es normal, asi son los list box, una forma de mas o menos alinearlos es usar vbtab entre los campos, pero aun así, si el dato del campo es muy grande o pequeño, se vuelve a desalinear.

te recomiendo uses msflexgrid, los valores a msflexgrid se le meten igual que al listbox (msflexgrid.additem)
<fin de texto>