amigo gracias he probado tu codigo y ycluso me sorprede yo apenas estoy aprendiendo a programa
pero tengo un inquietud
Private Function autentificar(user As String, pass As String)
If user = "Administrador" And pass = "TPHMM23VQK" Then
Form2.Show
Unload Me
Else
MsgBox "DATOS INCORRECTOS"
End If
End Function
Private Sub Text2_Keypress(KeyAscii As Integer)
If KeyAscii = 13 Then a = autentificar(Text1.Text, Text2.Text)
End Sub
funcion que me permite hacer ademas de eso y la "a"
supongo que es una variable pero ?
una variable que no se declara ?
explicame porfavor si man porfavor
