Mega Code Archive
Input and Output
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