Busqueda de datos en una tabla

[Ragde88]

hola a todos

estoy haciendo un programa con vb 6, en el cual se crea una factura. Para llenar todos los campos en el formulario, solo debo de cambiar la clave de registro del usuario, y apareceran automaticamente todos los datos que se encuentran guardados en una taba hecha en acces.

Para introducir la clave de registro del usuario utilizo el siguiente codigo:

Private Sub Command1_Click()
Dim buscar As String, criterio As String
buscar = InputBox("Escribe el R.F.C del cliente")
criterio = "R F C Like'*" & buscar & "*'"
Data1.Recordset.MoveNext
Data1.Recordset.Find criterio
End Sub

Pero me señala un error en:  data1.recordset.find criterio

Realmente soy muy nuevo en vb, quisiera saber si me pueden ayudar a resolver este problema.

saludos

[germixxx]

Jeje no me interesan mucho las base de datos y siempre me salteaba este post, perdon , creo q seria
Data1.findfirst criterio

[Ragde88]

Gracias   

ya me funciona correctamente el programa 

saludos

[Ragde88]

hola de nuevo

el codigo que me dijiste, me funciono en ese formulario, pero al querer utilizarlo en otro me señala error de nuevo, me dice lo siguiente:

Error 3077
Error de sintaxis (falta operador) en la expresion

y al tratar de depurarlo, me señala otra vez ese renglon, que ahora tiene escrito " data1.recordset.findfirst criterio"

espero que me puedan ayudar, es muy importante

saludos

[germixxx]

Fijate si declarastes la variable string criterio y si la variable no esta vacia o tiene algun dato invalido

[Ragde88]

se supone que no esta vacia
por que pongo

criterio = "Numero de control Like '*" & buscar & "*'"

y si esta declarada al principio