How to set pass?
I made A pass Thing But how to activate on the hack?
In your main form put in on the form load sub
mainform.hide
passwordform.show
I'm too busy to make a more detailed reply.
Hmm try this
- 2 text boxs
- 2 command buttons
Code:
Private Sub Command1_Click() <-- Insert this code into command.1
Dim User$, Pw$
User = "UserName" <-- Set Ur Username
Pw = "Password" <-- Set ur Pass
If Text1.Text = User And Text2.Text = Pw Then
MsgBox " Correct Login "
Unload Form1
Form2.Show
Else
MsgBox " Wrong userName And Or Password"
End
End If
End Sub
Private Sub Command2_Click()
End
End Sub
Then right click on Form1 and then go to Add> another form and that will be your Hack instead of the first because the first form will be the Log-In And remember to delete
<-- Set ur username
<-- Set ur password
Set 2nd box cancel and 1st box Log-In