Language Basics VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Language Basics
  4. Using Assertions
Sub Assertion()
    Dim intAge As Integer
    intAge = InputBox("Please Enter Your Age")
    Debug.Assert (intAge >= 0)
    msgBox "You are " & intAge
End Sub