Advertisement
Guest User

Untitled

a guest
Jun 27th, 2017
57
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.98 KB | None | 0 0
  1. Public Class Form1
  2.  
  3. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  4. If TextBox1.Text = "Admin" And TextBox2.Text = "chujciwdupe" Then
  5. MsgBox("You are Now Logged In", MsgBoxStyle.Information, "Login")
  6.  
  7. Else
  8. If TextBox1.Text = "" And TextBox2.Text = "" Then
  9. MsgBox("No Username and/or not password Found", MsgBoxStyle.Critical, "Error")
  10. Else
  11. If TextBox1.Text = "" Then
  12. MsgBox("No Username Found ! ", MsgBoxStyle.Critical, "Error")
  13. Else
  14. If TextBox2.Text = "" Then
  15. MsgBox("No Password Found", MsgBoxStyle.Critical, "Error")
  16. Else
  17. MsgBox("Invalid Username And/Or Password", MsgBoxStyle.Critical, "Error")
  18. End If
  19. End If
  20. End If
  21. End If
  22. End Sub
  23. End Class
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement