Como mostrar todos los campos de una table Access2007 en Visual Basic 6.0?

[mesenier]

Hola, utilizando ADODB en visual basic 6 he conseguido mostrar el camo que desee de un registro u otro, sin embargo, mi intencion es hacer un buscador, para ello he de mostrar los datos de toda la tabla, o que coincidan con el criterio de busqueda

Código:

Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset


With rs
        .Close
        .ActiveConnection = cn
        .CursorLocation = adUseClient
        .CursorType = adOpenStatic
        .LockType = adLockOptimistic
       
     '   .Open "select * from MITABLA where MICAMPO like '" & "%MICRITERIOABUSCAR%" & "';"
        
    End With

list1.additem rs(0) ' rs0 es el valor que hay en el primer campo del registro que coincida con el criterio de busqueda, (1 seria el segundo, 2 el tercero etc)

Este metodo funciona, perfectamente, la pregunta es, ¿como puedo mostrar TODOS los registros que coincidan con el criterio a buscar?