Advertisement
Just_Tom

Untitled

Mar 24th, 2024
48
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VisualBasic 1.46 KB | Source Code | 0 0
  1. Private Function CorrectDetailsSign() As Boolean
  2.     lblUsernameErrorSin.Show()
  3.     lblPasswordErrorSin.Show()
  4.     lblPasswordRepeatErrorSin.Show()
  5.     'Assigns errors if there's an error in any of the text
  6.    If txtUsernameSin.Text = "Username" Or txtUsernameSin.Text = "" Then
  7.         lblUsernameErrorSin.Text = "Null error"
  8.     ElseIf CheckForRepeatingUsername() = True Then
  9.         lblUsernameErrorSin.Text = "Username already exists"
  10.     ElseIf txtUsernameSin.Text.Contains(",") Then
  11.         lblUsernameErrorSin.Text = "Commas are prohibited"
  12.     Else
  13.         lblUsernameErrorSin.Hide()
  14.     End If
  15.     If PasswordSign = "" Then
  16.         lblPasswordErrorSin.Text = "Null error"
  17.     ElseIf (PasswordSign.Length < 8 Or CheckNumbers() = False Or CheckSpecialCharacter() = False) And Not PasswordSign.Contains(",") Then
  18.         lblPasswordErrorSin.Text = "Requirements: 8 char, 1 num, 1 special char"
  19.     Else
  20.         lblPasswordErrorSin.Hide()
  21.     End If
  22.     If PasswordRepeat <> PasswordSign Then
  23.         lblPasswordRepeatErrorSin.Text = "Passwords must match"
  24.     ElseIf txtPasswordRepeatSin.Text = "" Or txtPasswordRepeatSin.Text = "Confirm Password" Then
  25.         lblPasswordRepeatErrorSin.Text = "Null error"
  26.     Else
  27.         lblPasswordRepeatErrorSin.Hide()
  28.     End If
  29.     If lblUsernameErrorSin.Visible = True Or lblPasswordErrorSin.Visible = True Or lblPasswordRepeatErrorSin.Visible = True Then
  30.         Return False
  31.     End If
  32.     Return True
  33. End Function
  34.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement