Hacer una busqueda

[crucifijo]

Hola amigos ke tal fijense ke estoy haciendo una aplicacion de horarios y ya saben he copiado codigo de algunos ejemplos, la pregunta es ¿quiero hacer una busqueda y ke me la despligue utilizo para conectarme a la base de datos un Adodc con un datagrid y ya saben con un boton de buscar.

Entonces quisiera que al hacer una busqueda en la tabla de profesores por nombre o clave y que me la desplegara en el datagrid.

Mi base de datos se llama bodega.db y la tabla de profesores se compone de la sig manera:


Profesores
IdProfesor
Nombre
Apellido
DireccionTelefono
Cp
Rfc

Declare un modulo con las conexiones a continuacion les codigo

Public access As String
Public db As Database
Public rs As Recordset
Public var_id As Integer
Public up As String
Public sql As String

Y me conecto de la siguiente manera via codigo

Set db = OpenDatabase(App.Path & "\bodega.mdb")
sql = ""
sql = "select * from profesores"

Set rs = db.OpenRecordset(sql, 2)

Pero como use un componente Adodc utilize el wizard conectandome con las propiedades
Nombre = Adodc1
ConnectionString= DSN = Bodega
RecordSource = select * from profesores

El datagrid lo conecte igual utilizando las propiedades
DataSource = Adodc1
para que me desplegara los registros

ojala me pudieran ayudar