PROGRAMAR BOTON DE BUSCAR EN VISUAL BASIC 6.0

COMO PROGRAMAR EL BOTON DE BUSCAR EN VISUAL BASIC 6.0

Ola amigos aqui les dejo este video tutorial donde aprenderemos a programar un boton de buscar en nuestra base de datos microsoft access en visual basic 6.0.

En este ejemplo lo programaremos para que realice la busqueda en nuestra base de datos microsoft access por nombe, apellidos, DNI o Cedula.

Ya que tengamos nuestra conexion realizaremos realizaremos el boton, pero como me han hecho el comentario de que solo una vez me hace la funcion de busqueda bueno este caso tendriamos que hacer un refesh a la base de datos y un exit sub.

Ejemplo que tengamos nuestro adodc1 ingresado en nuestro formulario y deseamos buscar por nombre realizaremos una funcion publica llamada buscarnombre.

public sub buscarnombre()

dim nombre as string

nombre=text1.text

adodc1.recordset.fiend "nombre"

if adodc1.recordse.eof then 'si no la encuentra

msgbox "No se Encontro"

adodc1.refresh

exit sub

else

'rellenar casillas

text2.datafield = "nombre"

text3.datafield="apellido"

text4.datafield = "telefono"

text5.datafield ="cedula"

adodc1.refresh

exit sub

end if

end sub

ver video de ejemplo

Si te gusta este video o si te sirvio no olvides dejar tu comentario en el para poder saber que si ha sido de ayuda

Te invito a que te suscribas a mi canal para recibir mas notificaciones de lo que estaré subiendo en youtube.