Cita:
Iniciado por rastafinis 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

La "a", "i", "x", etc, si son variables que debes declarar siempre y cuando tu quieras obetener información de ellas.
Es decir, cuando tu llames a "a" así:
a= (Text1.Text, Text2.Text)
Te va a marcar error porque "a" no tiene nada.
pero si la llamas así:
a = autentificar(Text1.Text, Text2.Text)