Login form

Here's a simple tutorial made by me to make a login form allowing you to keep unwanted people out of your programs.

The things you will need.

- 2 text boxs
- 2 command buttons

Code:

Private Sub Command1_Click()
Dim User$, Pw$
User = "UserName"
Pw = "Password"

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

And once your done it should look a little some thing like the picture below.

 

Nice little guide there, but it wouldn't be very secure, try encrypting the password.

 

you can easily get the user and password using OllyDbg or a program similar, but the small tutorial of yours is not bad.

 

How do you get the pw to star (******) ?

 

You can either put...
Text.PasswordChar = "*"
*Note, edit "Text" to whatever textbox it is, ex. Text1, Text2, Text3, etc.
In the form load, or click on the textbox you want to have password characters, scroll down in the properties menu until you find "PasswordChar" and make it * or any character of your choice.

 

Thanks for the tutorial, its the first real one I have followed. After tweaking around with it and adding my own ideas I made a extra Splash screen hat opens the login form when you click on the Splash screen, 2 forms for if you get the answer correct or incorrect and the form that it opens after you login successfully and past the "correct" form.

Heres a link: http://www.freephpbb3hostin.exofire.net/file_dump/TDS_VB_APP1.exe

The username and password for the login is, Username: name Password: pass

 

Good Work & Keep it up.

 

Don't gravedig >_>