VISUAL BASIC
PROYECTOS REALIZADOS
USUARIO
Public Class Frmusuario
Private Sub Cmdaceptar_Click(ByVal sender As System.
Object,
ByVal As System.
EventArgs) Handles Cmdaceptar.
Click
If Txtusuario.
Text = "administrador" Or Txtusuario.
Text =
"ADMINISTRADOR"...
More
VISUAL BASIC
PROYECTOS REALIZADOS
USUARIO
Public Class Frmusuario
Private Sub Cmdaceptar_Click(ByVal sender As System.
Object,
ByVal As System.
EventArgs) Handles Cmdaceptar.
Click
If Txtusuario.
Text = "administrador" Or Txtusuario.
Text =
"ADMINISTRADOR" And Txtclave.
Text = "010386" Then
Me.
Hide()
Less