10.2VBA程序设计基础 字符及字符串常量 ■字符类型的常量称为字符常量,字符常量要用定界符双 引号(“”)界定。例如,“d”、‘5”、“A”等都是字符常 量 符号常量 Const常量名=常量值 例如, Const Pi=3.14, Const abc="OK! China!
10.2 VBA程序设计基础 ◼ 字符及字符串常量 ◼ 字符类型的常量称为字符常量，字符常量要用定界符双 引号（“ ”）界定。例如， “d”、“5”、“A”等都是字符常 量。 ◼ 符号常量 ◼ Const 常量名=常量值 ◼ 例如，Const PI=3.14，Const ABC="OK ! China!
10.2VBA程序设计基础 (2)变量 变量是在程序运行期间其值可以发生变化的数据。 例如 1 Dim A, B As Integer 2A=1 3B=2 4A=4+b 5A=3 A在本程序段中有3个不同的值,这就是变!
10.2 VBA程序设计基础 ◼ （2）变量 ◼ 变量是在程序运行期间其值可以发生变化的数据。 ◼ 例如： 1 Dim A,B As Integer 2 A=1 3 B=2 4 A=4+b 5 A=3 A在本程序段中有3个不同的值，这就是变！
10.2VBA程序设计基础 VBA数值数据类型 数据类型存储空间 数据范围 Bvte 1字节 0~255 Boolean 2字节 True或 false Integer 2字节 32768-32767 Long 4字节 2147483648~2147483647 Single 4字节 负数:-3.402823E381401298E-45 正数:1.401298E-45-3402823E38 Double 8字节 负数:179769313486232E308-494065645841247E324 正数:494065645841247E3241.79769313486232E308 Currency 8字节 -92233720368547758089223372036854775807 Date 8字节 0100年1月1日到99912月31日 Object t4字节任何对象引用 String 字符长度 分为定长和可变长度两种,可变长可达0~20亿个字符,定长最多 65536个字符 Ⅶrin数字小1字节任何数字,最大达到onb的数值范围 Ⅵmm字符字符串长度约0~20
10.2 VBA程序设计基础 ◼ VBA数值数据类型 数据类型 存储空间 数 据 范 围 Byte 1 字节 0~255 Boolean 2字节 True 或 false Integer 2 字节 -32 768~32 767 Long 4 字节 -2 147 483 648~2 147 483 647 Single 4 字节 负数：-3.402823E38~-1.401298E-45 正数：1.401298E-45~3.402823E38 Double 8 字节 负数：1.79769313486232E308~-4.94065645841247E-324 正数：4.94065645841247E-324~1.79769313486232E308 Currency 8 字节 -922337203685477.5808~922337203685477.5807 Date 8字节 0100年1月1日到9999年12月31日 Object 4字节 任何对象引用 String 字符长度 分为定长和可变长度两种，可变长可达0～20亿个字符，定长最多 65536个字符 Variant(数字) 16字节 任何数字，最大达到double的数值范围 Variant(字符) 22+字符串长度 约0～20亿
10.2VBA程序设计基础 ■字符串类型 在VBA中有两种类型的字符串,变长与定长的字符串。 Dim sl As String ∥/变长类型 Dms2 As String*10/定长类型 s1=dddkdk s2="d1234567890sss
10.2 VBA程序设计基础 ◼ 字符串类型 ◼ 在VBA中有两种类型的字符串，变长与定长的字符串。 Dim s1 As String //变长类型 Dim s2 As String *10 //定长类型 s1="dddkdk " s2="d1234567890sssss
10.2VBA程序设计基础 布尔类型 ■布尔类型是比较运算或逻辑运算的结果值,宅只有 两个取值:True和 False。True是比较结果为真时的 值, False是比较结果为假肘的值。 Dim a as boolean Dim b as boolean A=3>5 B=True
10.2 VBA程序设计基础 ◼ 布尔类型 ◼ 布尔类型是比较运算或逻辑运算的结果值，它只有 两个取值：True和False。True是比较结果为真时的 值，False是比较结果为假时的值。 Dim A As Boolean Dim B As Boolean A=3>5 B=True