Ayuda para busqueda

[Falconvela]

Rod203. Creo que es esto lo que quieres.

Dctrl.recordset.recordsource = "Select * from <Tabla> Where <Campo del telefono en la BD> = " & TxtTelefono.Text '====el campo que utilizas para obtener el numero de telefono
Dctrl.refresh
if Dctrl.recordcount > 0 then '====esto es que encontro un registro
TxtNombre.text = Dtctrl.recordset!<campo del nombre en la tabla>
TxtApellido.text = Dtctrl.recordset!<campo del apellido en la tabla>
etc. etc
else
mensaje de numero equivocado
end if
dctrl.recordset.close

NOta: esto funciona si NO tienes los campos de texto vinculados por un databinding al DataControl...

Espero te ayude.