recordset

[KenMasters]

Mas o menos que es lo que deseas hacer, para poderte ayudar,.. de todas formas espero te de una idea de como puedes hacer recorridos en rs.

Código vb:

Set rs = New Recordset
rs.Open "aqui va tu consulta SQL", cn, adOpenDynamic, adLockOptimistic
Do Until rs.EOF
    text1.text = rs.Fields(1)
    text1.text = rs.Fields(2)
    text1.text = rs.Fields(3)
    text1.text = rs.Fields(4)
    rs.MoveNext
Loop
 

Como veras imaginemos que tu tabla esta compuesta de campo1,2,3,4 que hacen referencia a los rs.fields(x) entonces por cada loop muestra cada fila a la vez.