Add two numbers together : Integer « Data Type « VBA / Excel / Access / Word

Home
VBA / Excel / Access / Word
1.Access
2.Application
3.Data Type
4.Data Type Functions
5.Date Functions
6.Excel
7.File Path
8.Forms
9.Language Basics
10.Math Functions
11.Outlook
12.PowerPoint
13.String Functions
14.Windows API
15.Word
16.XML
Microsoft Office PowerPoint 2007 Tutorial
Microsoft Office Excel 2007 Tutorial
Microsoft Office Word 2007 Tutorial
VBA / Excel / Access / Word » Data Type » Integer 
Add two numbers together
 
Sub addNumbers()
   'Declare the variables
   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")
   'Add numbers
   intSum = intNumber1 + intNumber2
' Create an output
   Debug.Print "The numbers entered were " & intNumber1 & " and " & intNumber2
End Sub

 
Related examples in the same category
1.Integer number
2.Local Integer variable
3.Add integer together
4.Select Case statement with Integer value
5.Input and Output
6.Use If statement with Integer
7.The Integer data type is the most efficient way of handling numbers from -32,768 to 32,767
8.Overflow error
java2s.com  |  | Contact Us | Privacy Policy
Copyright 2009 - 12 Demo Source and Support. All rights reserved.
All other trademarks are property of their respective owners.