Acerca de la programación VB
Subcomando privado1_Click()
Si Text1.Text = "ABCDEF" y Text2.Text = "12345" Entonces
MsgBox "Bienvenido" p >
Descargarme
Else
MsgBox "El nombre de usuario o la contraseña son incorrectos, vuelva a ingresar"
Finalizar si
End Sub
Sub privado Form_Load()
Command1.Cancel = "Confirmar"
Label1.Caption = "Nombre de usuario:"
Label2.Caption = "Contraseña:"
Text2.PasswordChar = "*"
End Sub