Data Type VisualBasic Script

Sub addNumbers()
   Dim intNumber1 As Integer
   Dim intNumber2 As Integer
   Dim intSum As Integer
   'Create InputBoxes to enter numbers
   intNumber1 = InputBox("Enter the first number")
   intNumber2 = InputBox("Enter the second number")
End Sub