Visual Basic para Aplicaciones - Problemas con las consultas

Hola..
Tengo un problema al hacer ciertas consulatas a una base de access, la base es creada , y llenada desde vb6. Estas son mis variables

Public Base As DAO.Database
Public Tabla As DAO.TableDef
Public campo As DAO.Field
Public db As DAO.Recordset

Set Base = OpenDatabase(RUTA)
Set db = Base.OpenRecordset _
("Select * from Tabla WHERE Campo = " & Variable, dbOpenDynaset, dbOptimistic)

cuando trato de hacer una consulta de este tipo no funciona, logicamente si le saco la condicion si esntra a la base de datos y selecciona todo ...

Como debo hacer ese tipo de consultas que requieren ciertos parametros

saludos.... Si quieren me responden al mail

No conozco bien DAO, pero ???
esto?
("Select * from Tabla WHERE Campo = " & Variable, dbOpenDynaset, dbOptimistic)
No mas bien creas una variable strSQL y
strSQL = "SELECT * FROM TABLA WHERE Campo =" & Variable & ""
Luego abre el recordset y le llevas strSQL
Además si el campo es un campo tipo texto es:
WHERE Campo =' " & Campo & " ' "
Si es fecha con # y si es numero Nada