Advertisement
Guest User

Untitled

a guest
Jun 20th, 2019
71
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.30 KB | None | 0 0
  1. Select Case Lcase(columnValue(0))
  2. Case "fax" :
  3. continue = True
  4. Case "scan" :
  5. continue = True
  6. Case "european" :
  7. continue = True
  8. Case "african" :
  9. continue = True
  10. Case Else :
  11. Messagebox "Not one of the correct answers.",, "Non-numeric value"
  12. Continue = False
  13. End Select
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement