Mega Code Archive

 

Categories / VisualBasic Script / Language Basics

 

Using Assertions

Sub Assertion()     Dim intAge As Integer     intAge = InputBox("Please Enter Your Age")     Debug.Assert (intAge >= 0)     msgBox "You are " & intAge End Sub