búsqueda en base de datos

Partiendo de la base de que tienes una conexion establecida entre el formulario y la BBDD (ya sea por un Data Control o por codigo), lo unico que tienes que hacer es manipular el RecordSource para realizar la consulta de la manera adecuada:
Private Sub Command1_Click()
If Text1.Text = Empty Then
Data1.RecordSource = "Select * from Tabla1"
Else
Data1.RecordSource = "Select * from Tabla1 where ([Campo1] = '" & Text1.Text & "')"
End If
Data1.Refresh
End Sub

Te he hecho el ejemplo para la busqueda de un campo de tipo caracter (el numerico es sin la comilla simple).
Espero que sea esto lo que querias, si te hace falta algo mas ya sabes donde encontrarme.
Un saludo. :)