How to set pass?

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

Uhh dude this is what you do

1st Form = Login

2nd Form = Hack

Right click on form1 and add another form .EXE file

Now that will be your hack.