mostrar ciertos datos de una tabla de access

[vbx3m]

De esta manera es facil utilizando Datagrid y Adodc:

Código:

Dim CRITERIO as String
CRITERIO = "SELECT  campo1, campo2, campo3 " & _
                     "  FROM Tabla " & _
                     " WHERE (campo1 LIKE '" & Text1 & "%') ORDER BY campo1"

Adodc1.RecordSource= CRITERIo
Adodc1.Refresh

Este ejemplo es con una condicion, puedes poner otras condiciones...
Si utilizas un Datagrid le estableces la propiedad DataSource que sea Adodc1...