- You must use a letter as the first character.
- You can't use a space, period (.), exclamation mark (!), or the characters @, &, $, # in the name.
- Name can't exceed 255 characters in length.
Dim <<variable_name>> As <<variable_type>>
Dim a, b, c As Single, x, y As Double, i As Integer ' a, b, and c are all Single; x and y are both Double
- Numeric Data Types
- Non-numeric Data Types
Type |
Range of Values |
Byte |
0 to 255 |
Integer |
-32,768 to 32,767 |
Long |
-2,147,483,648 to 2,147,483,648 |
Single |
-3.402823E+38 to -1.401298E-45 for negative values 1.401298E-45 to 3.402823E+38 for positive values. |
Double |
-1.79769313486232e+308 to -4.94065645841247E-324 for negative
values 4.94065645841247E-324 to 1.79769313486232e+308 for positive
values. |
Currency |
-922,337,203,685,477.5808 to 922,337,203,685,477.5807 |
Decimal |
+/- 79,228,162,514,264,337,593,543,950,335 if no decimal is
use +/- 7.9228162514264337593543950335 (28 decimal places). |
Non-Numeric Data Types
Following table displays the non-numeric data types and the allowed range
of values accordingly.
Type |
Range of Values |
String (fixed length)
|
1 to 65,400 characters
|
String (variable length) |
0 to 2 billion characters |
Date |
January 1, 100 to December 31, 9999 |
Boolean |
True or False |
Object |
Any embedded object |
Variant (numeric) |
Any value as large as double |
Variant (text) |
Same as variable-length string
|
Private Sub Student_Click() Dim name As String name = "Abhishek Singh" Dim num As Integer num = 101 Dim BirthDay As Date BirthDay = DateValue("30 / 10 / 2020") MsgBox "Name is " & Name & Chr(10) & "Roll No is " & num & Chr(10) & "Your Birth-Date is " & BirthDay End Sub
Private Sub Student_Click() Dim name As String, num As Integer, Birthday As Date name = "Abhishek Singh" num = 101 Birthday = DateValue("30 / 10 / 2020") MsgBox "Name is " & name & Chr(10) & "Roll No is " & num & Chr(10) & "Your Birth-Date is " & Birthday End Sub
Post a Comment