Language Basics VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Language Basics
  4. Use If and IsNumeric function to check user input
Sub macro_if()
  Dim number
  number = InputBox("Type in a number, please!")
  If Not IsNumeric(number) Then
    MsgBox "This is no number!"
  ElseIf number > 10 Then
    MsgBox "The number is larger than 10."
  Else
    MsgBox "The number is smaller then or equal 10."
  End If
End Sub