Pues trabaja con tus recorsets y consultas SQL:
Si el campo es numérico usa este:
Código vb:
Ver originalres.Open "SELECT * FROM Tabla WHERE Campo=" & Valor
Si es una cadena, añades los apostrofes:
Código vb:
Ver originalres.Open "SELECT * FROM Tabla WHERE Campo='" & Valor "'"
Si es una fecha, añades los signos numeral:
Código vb:
Ver originalres.Open "SELECT * FROM Tabla WHERE Campo=#" & Valor & "#"
Y por ejemplo ese resultado lo muestras en un datagrid, asignandole tu recorset de esta manera:
Prueba para ver como te va con la consulta, y me comenta cualquier cosa...