Foro de programacion

¿me podrían ayudar por favor?
estoy trabajando con una base de datos en dbase IV. Hice un código para trabajar con la información de la base de datos.

La parte de obtener información y moverse con MoveNext no hay problema, pero cuando quiero buscar el registro donde se encuentra algún dato no me lo permite. Me saca un error de "Operation is not supported for this type of object"
y me lo señala en la línea que puse
Data1.Recordset.FindFirst "Nombre Like '" & txtBuscar.Text & "'"

¿Qué puse mal? Les agradecería que me pudieran ayudar


A continuación pongo todo el código que estoy utilizando.

Private Sub cmdBuscar_Click()
Data1.Recordset.FindFirst "Nombre Like '" & txtBuscar.Text & "'"
End Sub

Private Sub cmdCerrar_Click()
Data1.Database.Close
End
End Sub

Private Sub cmdSiguiente_Click()
Data1.Recordset.MoveNext
text1.Text = Data1.Recordset("nombre")
End Sub

Private Sub Command1_Click()
text1.Text = Data1.Recordset("nombre")
End Sub