Help
Printable View
Help
Here the code you need
VB Code:
Private Sub cmdOK_Click() If txtPassword = "password" Then LoginSucceeded = True Load frmMain frmMain.Label3.Caption = Me.txtUserName.Text Unload Me frmMain.Show Else MsgBox "Invalid Password, try again!", , "Login" txtPassword.SetFocus SendKeys "{Home}+{End}" End If End Sub