busqueda en Base de Datos

El Gato
23 de Junio del 2004
Me tira error en la busqueda y no se que es, si alguien me puede ayudar se lo agradezco:

Dim BaseDato As Database
Dim Tabla As Recordset
Set BaseDato = OpenDatabase(LoadResString(4) & usuarioactivo & "LgjbD.mdb")
Set Tabla = BaseDato.OpenRecordset("Personas")


Tabla.FindFirst "Telefono='" & Text1 & "'"

El Gato
23 de Junio del 2004
Se que esto debe ser facil, ME AYUDAN!!!!!!