Porque no probas asi:
Código:
Adodc1.RecordSource = "SELECT * FROM tabla WHERE campo = '" & txtvalor & "'"
Adodc1.Refresh
Claro que para que esto funcione la propiedad CommandType del Adodc debe ser
adCmdText ó
adCmdUnknown(recomendado).
Espero te sirva

Saludos