Visual Basic - consulta listview

HOLA Q TAL COMO PUEDO HACER PARA QUE CADA VES QUE GRABO UN REGISTRO SE VAYA MOSTRANDO UNO POR UNO EN UN LISTVIEW( EN ORDEN SEGUN VAYA GRABANDO)
Y COMO HAGO PARA QUE AL MOMENTO QUE CARGE EL FORMULARIO APARESCA EL CONTENIDO DE MI TABLA EN EL LISTVIEW
PARA ESTO USO UN ADODB.RECORSET PARA GRABAR Y LA BBBDD ES ACCESS

GRACIAS!!!!

es muy sencillo

asi

aqui va la consulta sql

If rs.RecordCount > 0 Then
rs.MoveFirst
Do While Not rs.EOF
With alumnos.ListItems.Add(, , "xxx", ,)
.SubItems(1) = xxx
.SubItems(2) = kkkk
End With
rs.MoveNext
Loop
End If

espero haber ayudado

HOLA
SABES ESTE CODIGO QUE ME MANDASTES
If rs.RecordCount > 0 Then
rs.MoveFirst
Do While Not rs.EOF
With alumnos.ListItems.Add(, , "xxx", ,)
.SubItems(1) = xxx
.SubItems(2) = kkkk
End With
rs.MoveNext
Loop
End If

FUNCIONA PERO SE REPITE VARIAS VECES EL REGISTRO EN EL LISTVIEW, OSEA GRABO Y APARECE EN EL LISTVIEW VARIAS FILAS DEL REGISTRO QUE GRABE

PORFA CUAL PUEDE SER LA SOLUCION
GRACIAS!!!