Hola!
Antes que nada, debes saber por cual campo vas a buscar los datos que deseas, por ejemplo por DOCUMENTO.
Luego en el boton BUSCAR:
Código vb:
Ver originalADODC.RECORDSET.MOVEFIRST
DO WHILE ADODC.RECORDSET.EOF=FALSE
IF ADODC.RECORDSET.FIELD("DOCUMENTO").VALUE= TRIM(TXTDOCUMENTO.TEXT) THEN 'TXTDOCUMENTO.TEXT es un textbox en donde pones el numero de documento
EXIT SUB
ELSE
ADODC.RECORDSET.MOVENEXT
ENDIF
LOOP
Como ya tienes conectado el ado data control con los textboxes, cuando salga de la rutina se va a quedar el registro que buscas