Advertisement
Guest User

How to make a login and register system by RADAR Technologie

a guest
Jul 28th, 2016
474
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.75 KB | None | 0 0
  1. Public Class Form1
  2.  
  3. Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 'LOGIN BUTTON
  4. If TextBox1.Text = My.Settings.username And
  5. TextBox2.Text = My.Settings.password Then
  6. MsgBox("Correct information. Access Granted!", vbInformation)
  7. Me.Hide()
  8. Form2.Show()
  9. Else
  10. MsgBox("Error - Wrong login-information written.", vbCritical)
  11. End If
  12. End Sub
  13.  
  14. Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click 'REGISTER BUTTON
  15. My.Settings.username = TextBox3.Text
  16. My.Settings.password = TextBox4.Text
  17. My.Settings.Save()
  18. MsgBox("Account created.", vbInformation)
  19. End Sub
  20. End Class
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement