19
2017年3月4日星期六

Const daysinyear As Integer = 365 Private Const workdays As Integer = 250 Const conpi As Double = 3.14159265358979 Const myage As Integer = 9 Const datenow = #12/20/2005/# Public Const str1 As String = "Visual " Const str2 = "Hello！"

2017年3月4日星期六
22
Public Const a =b * 2 Public Const b = a / 2 注意不要用常量互相定义出现循环，导致编 译错误

2017年3月4日星期六
23
2.2.2 变量
变量:在程序执行期间其值发生变化的量 变量代表内存中指定的存储单元 每个变量有名字，还有类型 可以通过名字引用变量 数据类型确定了变量中可以存储的数据的类 型
20
2017年3月4日星期六
Const conpi As Double = 3.1415927， Const daysinyear As Integer = 365 一行中用逗号分开多个常量的声明

2017年3月4日星期六
21
Const conpi = 3.14159265358979 Const conpi2 = conpi * 2 用已定义的常量定义新的常量

2017年3月4日星期六 32
声明多个相同类型变量
Dim I, J, K As Integer '3个变量都为Integer类型 Dim str1, str2 As String '2个变量都为String类型

2017年3月4日星期六
33
声明多个不同类型变量


Dim a As Integer，b As Single，c As Double '声明了3个不同类型的变量，a是Integer类型，b是 Single类型，c是Double类型 Dim ch As Char，str1 As String '声明了2个不同类型的变量，ch 是Char类型，str1 是 String 类型
2017年3月4日星期六
6



K=563 K=563S K=563L K=563D K=563F K=563R M=“A”C
'不使用值类型字符，则默认为是Integer类型 '使用值类型字符S，则认为是Short类型 '使用值类型字符L，则认为是Long类型 '使用值类型字符D，则认为是Decimal类型 '使用值类型字符F，则认为是Single 类型 '使用值类型字符R，则认为是Double 类型 „使用值类型字符C，则认为是Char 类型
14
Object对象类型


对象类型：4B长度，存储地址，指向应用程 序或者其他应用程序中的一个对象，对象型 变量可以指向程序中任何可处理的对象 Object类型元素可以接受任何数据类型的值 ，当其中包含值类型或者引用类型时， Object被当值类型或者引用类型使用，此 引用类型变量 时值类型变量 Object变量不包含变量本身，而是指向值 的指针 。 1234

2017年3月4日星期六
24
隐式和显示声明

提供了控制是否必须强制显示声明 的Option Explicit语句，默认此语句的值为 on，即要求必须在使用变量前显示声明变量， 如果设置为off，可以不声明就使用变量。
2017年3月4日星期六
25
修改Option Explicit语句

'溢出，大 '不溢出，
2017年3月4日星期六
11
字符及字符串类型
单个字符用Char类型，长度2个字节 存储一串字符用String类型，串中每个字符 以2B长度存储

2017年3月4日星期六
12
“A” „包含单个字符A的字符串 "欢迎使用Visual " '包含一串字 符的字符串 "" '空字符串
负数的范围是 –3.4028231038~ –1.40129810–45 正数的范围是1.40129810–45~3.4028231038
负数的范围是–1.7976931348623110308~ –4.9406564584124710–324 正数的范围是4.9406564584124710–324~ 1.7976931348623110308 没有小数点时为79 228 162 514 264 337 593 543 950 335； 小数点右边有28个数字时为 7.9228162514264337593543950335； 最小的非零数为 0.0000000000000000000000000001 0 ~ 65535(无符号) 0至约二十亿个Unicode 字符 True或者False 公元1年1月1日—9999年12月31日
双精度实型 定点数型
常用数据类型
2.1 基本数据类型 表2-1 的基本数据类型
类 型 名 Byte（字节型） Short（短整型） Integer（整型） Long（长整型） Single（单精度浮点型） Double（双精度浮点型） 1 2 4 8 4 8 存储大小/B 0 ~255(无符号) –32 768~32 767 –2 147 483 648 ~2 147 483 647 –9 223 372 036 854 775 808 ~ 9 223 372 036 854 775 807 取值范围

除此外的类型没有值类型字符
2017年3月4日星期六
7
整数类型
Byte（无符号）、short、integer、long （有符号）都是 算术处理速度快 根据存储数据大小选择

2017年3月4日星期六
8
特例
Dim K As Short '有效范围为–32 768~32 767 K = 32768 „导致错误产生,越界 K = 4.6 „K被转换为5(K为整型,则小 数四舍五入)

2017年3月4日星期六
13
其他类型
布尔类型：Boolean，长度2B，只能取True 或者False，默认False Date类型：8个字节时间从0：00：00～23： 59：59，常同时保存时间和日期 SomeDate = #12/12/2005 8：00 AM#

2017年3月4日星期六

2017年3月4日星期六
36
2017年3月4日星期六
34
初始化
Dim a As Integer=5，b As Single=7.5，c As Double=3.1415927 Dim ch As Char="A"，str1 As String="Output Data"

2017年3月4日星期六
35
类型字符
在声明中指定变量或者常量的数据类型 跟在常量或者变量名字的后面

2017年3月4日星期六
9
小数类型
常用的是双精度Double类型，可以科学计数 法 Single类型精确度不高 Decimal支持的有效位数最多

2017年3月4日星期六
10
Dim K As Decimal K = 9223372036854775808 于Long数据类型 K = 9223372036854775808D 因值为Decimal数据类型
X
1234
S X
Dim obj '默认为Object obj = 22 'obj包含数值22 obj ="22" 'obj包含双字符的串"22" obj = #12/12/2005 # 'obj包含日期型 值12/12/2005

2017年3月4日星期六
16
2.2 常量和变量
常量和变量的定义及使用： 命名，标识符的原则 字母或者下划线开头 只能包含字母、数字和下划线 以下划线开头，必须包含至少一个字母或者 数字 不能用关键字，不区分大小写
2
2017年3月4日星期六
2.1 基本数据类型 数据类型是广义概念 定义了数据的类型 决定了对不同类型数据的组织形式以及运算 方法

2017年3月4日星期六
3
程序使用的数据类型 字节型
整数类型
数值型 实数类型 基本数据类型 字符型 逻辑型 日期型 对象型 复合数据类型 数组类型 结构类型 字符型 字符串型 短整型 整型 长整型 单精度实型

2017年3月4日星期六
28
变量声明

声明语句来声明变量，格式如下：
Declare 变量名 [As 数据类型] Declare包括 Dim,Public,Protected,Friend,Private,Shar ed,Static 数据类型省略默认为Object类型，但Option Strict 的值为on时不能省略

2017年3月4日星期六 29
Option Strict 用来指定数据类型的转换限制 Option Strict 的值为on时，不允许自动类型 转换 Option Strict 的值为off时，允许自动类型转 换

2017年3月4日星期六
30
正确声明语句
Dim Myname As String '声明String类型变量Myname Public Total As Integer '声明Integer类型变量Total Dim Istrue As Boolean '声明Boolean类型变量Istrue