Advertisement
Guest User

Untitled

a guest
Jan 22nd, 2018
78
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.58 KB | None | 0 0
  1. Public Class Form1
  2. Dim Username As String = "Ryan"
  3. Dim Password As String = "123"
  4.  
  5. Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
  6. Dim submituser As String = TextBox1.Text
  7. Dim submitpass As String = TextBox2.Text
  8.  
  9. If submituser = username And submitpass = Password Then
  10.  
  11.  
  12. MessageBox.Show("you are now logged in", "confirmed")
  13.  
  14. ElseIf submituser = "" Or submitpass = "" Then
  15. MessageBox.Show("wrong Login", "Error", MessageBoxButtons.OK)
  16. End If
  17. End Sub
  18. End Class
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement