Hola a todos:
Estoy desarrollando un programa con Visual Basic y Access, de hecho lo que estoy empezando a hacer es a aprender VB. Mi duda es la siguiente:
Tengo un textbox llamado TextDNI y una etiqueta Define(2), y quiero que al introducir el DNI en el textbox busque en la tabla Usuarios y en el campo DNI la entrada que coincida. Si hay una entrada con ese DNI muestra en la etiqueta los valores de los campos nombre, apellidos y telefono y si no abre un nuevo formulario para registrar a ese usuario nuevo.
De momento he hecho este código que muestro más abajo y sólo me busca en la primera entrada de la tabla. Supongo que para que recorra todo el campo habrá que hacer un bucle o algo así.
La conexión con la base de datos ya la he realizado al abrir el formulario, así como definir las variables públicas y todo eso.
Código:
Private Sub TextDNI_KeyPress(KeyAscii As Integer)
If (KeyAscii = 13) Then
ButConfirm.SetFocus
identifica = TextDNI.Text
With db
Set rstUsuarios = .OpenRecordset("Usuarios")
With rstUsuarios
If (identifica = !DNI) Then
Define(2).Caption = !nombre + " " + !apellidos + ". Tel: " + !telefono
Else
UsuarioNuevo.Show 1
End If
End With
End With
End If
End Sub
Gracias por vuestra ayuda.