Programacion, vb 6, visual basic, foro programacion

Harold Guevara · #1 (**permalink**) 19-12-2006, 15:03:42

Saludos
Deseo programar un boton cuyo evento Click me permita especificar una busqueda por el numero de Identidad del usuario.

Esta consulta se hace en el campo NoIdentificacion de la tabla Personeros de la BD VotacionEscolar.mdb. (access 2000)
Estoy trabajando con el Adodc.
Necesito usar ya sea un Inputbox o un formulario para esta tarea.

De antemano gracia´s por su colaboracion.

PD: favor especificar la declaracion de variables y demas para esta consulta.

Harold.

J.M.Movilla · #2 (**permalink**) 19-12-2006, 16:58:53

Sin entrar en detalles de seguimiento de errores...

Creas un TextBox en tu formulario, así como un CommandButton.

Y en el evento Click del botón pones

Código:

Dim SQL As String
SQL = "NoIdentificacion like '" & Text1.Text & "'"
With Adodc1.Recordset
    .MoveFirst
    .Find SQL
    If .Eof Then
        msgbox("No se encuentra este Núm. Identificación.")
        Text1.SetFocus
        Exit sub
    EndIf
End With
'  Ya tienes localizado el registro

Bueno, si el NoIdentificacion es numérico, no pongas comillas simples en la SQL

Código:

SQL = "NoIdentificacion like " & Text1.Text