Advertisement
Guest User

Untitled

a guest
Mar 18th, 2018
74
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.66 KB | None | 0 0
  1. If (Integer.TryParse(txtPanels.Text < 1, c) Or Integer.TryParse(txtPanels.Text > 100, c)) Then
  2. lblStatus.Text = "Please Enter a correct amount of panels (1- 100)"
  3. End If
  4.  
  5. If Not IsNumeric(txtDepo.Text) Then
  6. lblStatus.Text = ("Invalid Deposit")
  7.  
  8. Return
  9. End If
  10. If (txtPanels.Text = "" Or IsInputChar(txtPanels.Text)) Then
  11. lblStatus.Text = ("Please Enter a correct amount of panels (1- 100)")
  12. End If
  13.  
  14. If Not IsNumeric(txtPanels.Text) Then
  15. lblStatus.Text = ("Please Enter a correct amount of panels (1- 100)")
  16.  
  17. Return
  18. End If
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement