VB程序设计第二版第三章

1、13.1 字符集与字符编码字符集与字符编码3.2 数据类型数据类型3.3 常量常量3.4 变量变量3.5 常用函数常用函数3.6 运算符与表达式运算符与表达式3.7 代码编写规范代码编写规范字符是构成程序设计语言的最小语法单位，字符集规定了一种程序设计语言允许使用的字符。VB使用Unicode字符集(一个字符用2字节存储), 其基本字符集包括:数字: 09英文字母: az，AZ特殊字符: 空格 ！ # $ % & ( ) * + - / ， . : ; ? _ | 等23关键字是关键字是VB使用的词，是语言的组成部分。使用的词，是语言的组成部分。关键字在语法上有着固定的含义，包括：关键

2、字在语法上有着固定的含义，包括：n预定义语句预定义语句n函数函数n操作符操作符 例如：例如：Print、Public、If、Abs、Or。 在在VB中，用户在代码窗口键入关键字后，中，用户在代码窗口键入关键字后，系统都能自动识别并转换为系统标准形式。系统都能自动识别并转换为系统标准形式。数据是程序的必要组成部分，也是程序处理的对象。不同类型的数据用于表示不同性质的信息。VB不但提供了系统定义的数据类型，而且还允许用户自己定义数据类型。45 数值型数值型 货币型货币型 字节型字节型 字符串型字符串型 逻辑型逻辑型 日期型日期型 对象型对象型 可变类型可变类型1）整数型（1）整型(Integer，

3、%)用2个字节存储十进制表示: 由+ -号，09 组成 范围: -3276832767例: -325 0 56 +1006（2） 长整型(Long，&) 以4个字节存储十进制表示: 由+ -号，09 组成 范围: -2147483648+2147483647例: 453466 -34568 +10000007（1）单精度浮点型(Single，!)每个单精度浮点数占4个字节的存储空间，可以精确到7位十进制数。负数取值范围为： -3.4028231038 -1.40129810-45正数的取值范围为： 1.40129810-453.4028231038。8单精度浮点数可以有以下两种表示形式

4、:（1）以！为后缀的数。例如，2.1！、100！（2）用科学记数法表示。 例如: -23.5E+3 表示-23.5103 2e-5 表示210-59 注意，科学记数法中的注意，科学记数法中的E可以大写或小写，可以大写或小写，E的两侧必须都有数。的两侧必须都有数。E之前可以是整数也之前可以是整数也可以是带小数点的数，可以是带小数点的数，E之后必须是一个整之后必须是一个整数。数。（2）双精度浮点型(Double，#)每个双精度浮点数占8个字节的存储空间，可以精确到15位或16位十进制数。负数的取值范围为： -1.7976931348623210308 -4.9406564584124710-324

5、正数的取值范围为： 4.9406564584124710-324 1.79769313486232103081011双精度浮点数可以有以下两种表示形式：双精度浮点数可以有以下两种表示形式：（1）以）以#为后缀的数。为后缀的数。 例如，例如，2.1#、100#（2）将科学记数法中的）将科学记数法中的E改为用改为用D（或（或d）表示的数。表示的数。 例如，例如，-23.5D+3 表示表示 -23.5103 2d-5 表示表示 210-5如圆周率用整型表示只能显示3,用单精度型就可以显示为3.141592,双精度就显示3.1415926535.XX,共15位数字1213n主要用于对精度有特别要求的重

6、要场合，主要用于对精度有特别要求的重要场合，如货币计算与定点计算如货币计算与定点计算n每个货币型数据占每个货币型数据占8个字节的存储空间个字节的存储空间n表示为整数或定点小数，小数点左边最多表示为整数或定点小数，小数点左边最多15位数字，右边最多位数字，右边最多4位数字位数字，第五位四舍，第五位四舍五入。五入。n取值范围为取值范围为： -922,337,203,685,477.5808 922,337,203,685,477.580714n每个字节型数据占每个字节型数据占1个字节的存储空间个字节的存储空间n取值范围为取值范围为0255n字节型在存储二进制数据时很有用字节型在存储二进制数据时很有

7、用每个日期型数据占8个字节的存储空间表示日期范围从100年1月1日到9999年12月31日表示时间范围从0:00:00到23:59:59。日期型数据由#号所包围，包含具有有效格式的字符序列。1516例如：例如：1992年年12月月31日可以表示为：日可以表示为： #12/31/92#1993年年1月月11日可以表示为：日可以表示为： #January 11 ,1993#1993年年3月月27日凌晨日凌晨1点点20分可以表示为：分可以表示为： #March 27,1993 1:20am#每个逻辑型数据占2个字节的存储空间逻辑型数据只有True和False两个值。常用逻辑型数据表示某种条件是否成立

8、。若将逻辑型数据转成数值型，true为-1，false为0；当数值型数据转换为逻辑型，非0为true，0为false。1718n字符串是一个用双引号括起来的字符序列，字符串是一个用双引号括起来的字符序列，由一切可打印的西文字符和汉字组成由一切可打印的西文字符和汉字组成nString类型的数据所占用的存储空间与字类型的数据所占用的存储空间与字符串长度有关，所谓字符串长度就是字符符串长度有关，所谓字符串长度就是字符串包含的字符的个数。串包含的字符的个数。例如：以下都是合法的字符串：例如：以下都是合法的字符串： Hello 3.14 A1 Visual Basic 程序设计程序设计 5+6= （空串

9、）（空串）字符串区分字母的大小写。 例如，“ABCD123”与“abcd123”代表两个不同的字符串。如果字符串本身包括双引号，可以使用连续的两个双引号表示。 例如： 要打印 “You must study hard”, he said.， 应写为： Print You must study hard , he said. 19字符串可分为变长字符串和定长字符串。例如：Dim a as string 变长Dim b as string *5 定长2021n对象型数据占对象型数据占4个字节的存储空间个字节的存储空间n用于引用应用程序中的对象用于引用应用程序中的对象22n变体型（可变类型）数据是一

10、种特殊的数变体型（可变类型）数据是一种特殊的数据类型，指所有没被显式声明为其他类型据类型，指所有没被显式声明为其他类型的变量的数据类型的变量的数据类型n变量在使用之前如果不声明类型，则默认变量在使用之前如果不声明类型，则默认为为Variant类型类型 一个用户自定义类型可以由若干个系统定义的数据类型组成。当需要创建单个变量来记录多项相关的信息时，用户自定义类型是十分有用的。工号工号姓名姓名性别性别工资工资23例如，设有以下表格信息：例如，设有以下表格信息：可以定义一种数据类型，该类型中的一个可以定义一种数据类型，该类型中的一个数据包含数据包含“工号、姓名、性别、工资工号、姓名、性别、工资”Ty

11、pe语句的格式如下：24Type 用户自定义类型名用户自定义类型名 元素名元素名1 As 类型类型名名 元素名元素名2 As 类型类型名名 End Type25例如，在窗体模块的通用声明段自定义例如，在窗体模块的通用声明段自定义一个一个worker数据类型，包含职工的工号、姓数据类型，包含职工的工号、姓名、性别、工资信息，相应的名、性别、工资信息，相应的Type语句如下：语句如下：Private Type worker No As long name As String Sex As String salary As single End Type26 一旦定义好了类型，就可以在声明变量时一旦

12、定义好了类型，就可以在声明变量时使用该类型。使用该类型。 例如，例如，Dim wr As worker 引用用户自定义类型元素格式：引用用户自定义类型元素格式：用户自定义类型变量名用户自定义类型变量名.元素名元素名 如果两个变量都属于同一个用户自定义类如果两个变量都属于同一个用户自定义类型，也可以将一个变量赋给另一个变量。型，也可以将一个变量赋给另一个变量。这是将一个变量的所有元素赋给另一个变这是将一个变量的所有元素赋给另一个变量的对应元素。量的对应元素。 常量是指在程序运行期间其值不发生变化的量。 VB的常量分两类：系统内部常量和符号常量。2728n系统内部常量是应用程序和空间提供的，常系统

13、内部常量是应用程序和空间提供的，常量名采用大小写混合的格式，前缀表示定义量名采用大小写混合的格式，前缀表示定义常量的库名称，主要以常量的库名称，主要以vb和和db开头。开头。n查看内部常量查看内部常量:使用使用“视图视图|对象浏览器对象浏览器”命命令。令。颜色颜色常量常量组组工程工程/库库颜色颜色常量常量系系统统定定义义29 将常量用一定的名称命名，以提高代码的可读性和可维护性。被命名的常量称为符号常量。符号常量在使用前需要使用Const语句进行声明（定义）。 Const语句的格式：30Public | Private Const 常量名常量名 As 类型类型 = 表达式表达式31（1）Pub

14、lic：用于声明可在所有工程的所有：用于声明可在所有工程的所有模块的任何过程中使用的符号常量。模块的任何过程中使用的符号常量。（2）Private：用于声明只能在包含该声明：用于声明只能在包含该声明的模块中使用的符号常量。的模块中使用的符号常量。（3）如果要使创建的符号常量只作用于某个）如果要使创建的符号常量只作用于某个过程中，则应在该过程内部声明该符号过程中，则应在该过程内部声明该符号常量。常量。在过程中的在过程中的Const语句不能使用语句不能使用Public和和Private关键字关键字。（4）常量名常量名：应按标识符的命名规则命名。：应按标识符的命名规则命名。32（5）类型类型：可选项

15、，用于说明符号常量的数：可选项，用于说明符号常量的数据类型；可以是据类型；可以是Byte、Boolean、Integer、Long、Currency、Single、Double、Date、String、String*n、Variant。（6）表达式表达式：由数值常量或字符串常量以及：由数值常量或字符串常量以及运算符组成，在表达式中不能使用函数运算符组成，在表达式中不能使用函数调用。如果没有为常量定义类型，则表调用。如果没有为常量定义类型，则表达式的结果类型奖决定常量的类型。达式的结果类型奖决定常量的类型。33Private Const Pi = 3.14159Public Const Max

16、As Integer = 100 ，Const BirthDate = #1/2/01# Const MyStr = HelloConst MyStr As String * 4 = 12345Const Pi = 3.14, Max = 100, MyStr=HelloConst Pi2 = Pi * 2Const sinx = Sin(3.14) 错误错误3435（7）注意避免两个以上的符号常量之间出现）注意避免两个以上的符号常量之间出现循环引用。循环引用。 例如例如，以下定义是错误的：，以下定义是错误的： Public Const conA = conB * 2 Public Const

17、 conB = conA / 2（8）符号常量与变量不同，符号常量一经定）符号常量与变量不同，符号常量一经定义后则只能使用，不能修改，而变量则义后则只能使用，不能修改，而变量则可以根据需要随时修改。可以根据需要随时修改。 Const pi = 3.14 pi = 3.1415926 错误错误36n 程序执行期间所处理的临时数据保存在程序执行期间所处理的临时数据保存在内内存单元存单元中，为了能够访问内存单元中的数中，为了能够访问内存单元中的数据，用名称来表示内存单元，该名称称为据，用名称来表示内存单元，该名称称为变量名变量名，而内存单元中保存的数据为变量，而内存单元中保存的数据为变量的值的值.n

18、在使用变量之前，一般要先声明变量名和在使用变量之前，一般要先声明变量名和类型，以便系统为其分配存储单元。类型，以便系统为其分配存储单元。n变量名变量名用来引用一个变量。用来引用一个变量。n变量的数变量的数据类型据类型用来确定该变量值的存用来确定该变量值的存储方式及所占用的存储空间。储方式及所占用的存储空间。37如果一个变量未经定义而直接使用，则如果一个变量未经定义而直接使用，则该变量为可变类型变量。该变量为可变类型变量。尽管尽管Visual Basic允许不声明变量类型而允许不声明变量类型而直接使用变量，但建议对所有变量显式声明直接使用变量，但建议对所有变量显式声明类型，使用可变类型的变量容易

19、产生一些意类型，使用可变类型的变量容易产生一些意想不到的结果，且浪费存储空间。想不到的结果，且浪费存储空间。38为了保证所有变量都得到声明，可以使用为了保证所有变量都得到声明，可以使用Visual Basic的强制声明功能，这样，只要在的强制声明功能，这样，只要在运行时遇到一个未经明确声明的变量名，运行时遇到一个未经明确声明的变量名，Visual Basic就会发出错误警告。就会发出错误警告。要强制显式声明变量，需要在窗体模块或标要强制显式声明变量，需要在窗体模块或标准模块的通用声明段中加入语句：准模块的通用声明段中加入语句：Option Explicit注意：该语句的作用范围仅限于其所在模块

20、。注意：该语句的作用范围仅限于其所在模块。39显式声明变量的语法格式如下：显式声明变量的语法格式如下：Dim|Private|Public|Static 变量名变量名 As 类型类型（1）Dimn在在模块的通用声明段模块的通用声明段中用中用Dim语句声明的语句声明的变量，对该模块中的所有过程都是可用的，变量，对该模块中的所有过程都是可用的，这种变量叫这种变量叫模块级变量模块级变量。n在在过程过程中用中用Dim语句声明的变量，只在过语句声明的变量，只在过程内部是可用的，这种变量叫程内部是可用的，这种变量叫过程级变量过程级变量。40（2）Private: 仅在模块的通用声明段中声明仅在模块的通用声

21、明段中声明变量。用变量。用Private声明的变量为模块级变量。声明的变量为模块级变量。（3）Public: 仅在模块的通用声明段中声明仅在模块的通用声明段中声明变量。用变量。用Public声明的变量为全局变量，工声明的变量为全局变量，工程中的所有过程都可以使用该全局变量。程中的所有过程都可以使用该全局变量。（4）Static: 仅在仅在过程中过程中声明变量，是一种过声明变量，是一种过程级变量。用程级变量。用Static语句声明的变量为静态变语句声明的变量为静态变量。静态变量在过程结束后，仍然保留其中量。静态变量在过程结束后，仍然保留其中的值。的值。（5）变量名变量名: 应遵循标识符的命名规则

22、。应遵循标识符的命名规则。41（6）类型类型: 指定变量的数据类型指定变量的数据类型,包括包括Byte、Boolean、Integer、Long、Currency、Single、Double、Date、String、String * n、Object、Variant、用户自定义类型或对象类型。、用户自定义类型或对象类型。（7）使用声明语句声明变量之后，）使用声明语句声明变量之后，VB自动自动对各类变量进行对各类变量进行初始化初始化。例如，数值变量被。例如，数值变量被初始化为初始化为0；可变长度字符串变量被初始化为；可变长度字符串变量被初始化为一个零长度的字符串（一个零长度的字符串（）；布尔型变

23、量被）；布尔型变量被初始化为初始化为False。用户自定义类型的变量的每。用户自定义类型的变量的每个元素作为各自独立的变量进行初始化。个元素作为各自独立的变量进行初始化。42Dim Sum As LongDim Address As StringDim No As String * 8 Dim Num, Total As Integer Num为可变类型为可变类型Private Price As Currency Public Average As Single Static i As Integer1）用于保存数字的6种数据类型Integer，long，currency，single，dou

24、ble，byte2）用来进行判断的boolean3）用来保存日期的date4）用来保存字符串的string435）用来保存对象引用的object类型6）用来保存任何数据的variant类型7）特殊数据：empty 和nullEmpty用来标识尚未初始化的variant变量，empty的variant变量值为0，如果是字符串为空串。Null是标识variant变量含有一个无效的数据。4445 内部函数是系统内部预定义的，用于根据内部函数是系统内部预定义的，用于根据用户指定的参数返回特定的函数值：用户指定的参数返回特定的函数值：调用格式为：调用格式为：函数名函数名(参数表参数表)n参数参数: 常量

25、、变量或表达式。多个参数之间常量、变量或表达式。多个参数之间以逗号分隔，有些函数可以没有参数。以逗号分隔，有些函数可以没有参数。n函数调用一般出现在表达式中，作为一个函数调用一般出现在表达式中，作为一个值参与表达式的运算或输出。值参与表达式的运算或输出。1.交互式函数例如：msgbox、inputbox等。2.类型转换函数4647数学函数用于各种数学运算，包括三角数学函数用于各种数学运算，包括三角函数、求平方根、绝对值、对数、指数函函数、求平方根、绝对值、对数、指数函数等。数等。所有数学函数的自变量是数值型，计算所有数学函数的自变量是数值型，计算结果也是数值型。结果也是数值型。Fix(45.6

26、7) 结果为45Int(45.67) 结果为45Fix(-2.89) 结果为-2Int(-2.89) 结果为-3Abs(-4) 结果为4Log(10) 结果为2.30258509299405Sgn(3) 结果为1Sgn(-6) 结果为-1Sgn(0) 结果为0求sin300 ：Sin(30 * 3.14 / 180)4849日期和时间函数用于：日期和时间函数用于：返回系统的日期和时间返回系统的日期和时间返回指定的日期和时间的一部分返回指定的日期和时间的一部分对日期型数据进行运算等。对日期型数据进行运算等。返回值的格式与所用操作系统的日期时间格式返回值的格式与所用操作系统的日期时间格式设置有关。

27、设置有关。4 日期和时间函数日期和时间函数50例：假设当前日期是例：假设当前日期是2008年年8月月8日、星期五、日、星期五、21点点12分分59秒，求以下各函数返回值。秒，求以下各函数返回值。Now返回返回08-08-08 21:12:59Date返回返回08-08-08Time返回返回21:12:59Day(Date)返回返回8Weekday(Date, 1)返回返回6 Weekday(Date, 2)返回返回5Month(Date)返回返回8Year(Date)返回返回2008Hour(Time)返回返回21Minute(Time)返回返回12Second(Time)返回返回59Time

28、r返回返回76379.0651Visual Basic提供了大量的字符串函数，提供了大量的字符串函数，具有很强的字符串处理能力。具有很强的字符串处理能力。例：例：LTrim( ABC) 返回返回 ABCRTrim(ABC ) 返回返回 ABCTrim( ABC ) 返回返回 ABCLeft(ABCDE,2) 返回返回 ABRight(ABCDE,3) 返回返回 CDE5. 字符串函数字符串函数52Mid(ABCDE,2,3) 返回返回BCDMid(ABCDE,2,6) 返回返回BCDELen(ABCDE) 返回返回5String(3,ABC) 返回返回AAASpace(3) 返回返回 InSt

29、r(ABCDECDE,DE) 返回返回4InStr(5,ABCDECDE,DE) 返回返回7UCase(Abc) 返回返回ABCLCase(Abc) 返回返回abc53 转换函数用于数据类型或形式的转换，包转换函数用于数据类型或形式的转换，包括整型、实型、字符串型之间以及与括整型、实型、字符串型之间以及与ASCII码字符之间的转换等。码字符之间的转换等。例：例： Asc(ABC) 返回返回65 Chr(65) 返回返回A Str(123) 返回返回 123 Str(-123) 返回返回-123 Val(123) 返回返回123 Hex(27) 返回返回1B Oct(27) 返回返回333.5.

30、3 转换函数转换函数用运算符将运算对象（即操作数）连接起来即构成表达式。VB有以下6类运算符和表达式： 算术运算符与算术表达式 字符串运算符与字符串表达式 关系运算符与关系表达式 布尔运算符与布尔表达式 日期运算符与日期表达式 对象运算符与对象表达式5455在代码中书写表达式时应注意以下几点：在代码中书写表达式时应注意以下几点：22112211xyxy 2283xyxy （1）表达式要写在同一基准线上。）表达式要写在同一基准线上。（2）乘号）乘号“*”不能省略，也不能用不能省略，也不能用“.”代代替。替。（3）表达式中只能使用圆括号。）表达式中只能使用圆括号。 优先级优先级运算符运算符运算运算

31、示例示例1（高）（高）乘方乘方322-取负取负-93 *乘法乘法3*53/浮点除法浮点除法10/34 整数除法整数除法10/35Mod取模取模10 mod 36+加法加法2+36（低）（低） -减法减法2-3563.6.1 算术运算符与算术表达式算术运算符与算术表达式57102 10的平方，结果为的平方，结果为10010(2) 10的的2次方，结果为次方，结果为0.01250.5 25的平方根，结果为的平方根，结果为58(1/3) 8的立方根，结果为的立方根，结果为2223 运算顺序从左到右，结果为运算顺序从左到右，结果为64(8)( 1/3) 错误，底数为负，指数应为整数错误，底数为负，指数

32、应为整数1乘方运算符乘方运算符104 结果为225.686.99 先四舍五入，再整除，结果为35810 Mod 4 结果为225.68 Mod 6.99 先四舍五入,再求余,结果为511 Mod 4 结果为311 Mod 5 结果为111 Mod 3 结果为259字符串运算符有两个: & + &：自动将两侧的操作数作为字符进行连接例: Hello & World 结果为Hello World Check & 123 结果为Check123 123 & 456 结果为123456 123 & 456 结果为123456：仅当两侧操作数都为字符串时才

33、做字符串连接 123 + 456 结果为123456 123 + 456 结果为579 123 + 456 结果为579 Check + 123 错误60 关系运算符又称为比较运算符，用于对两个表达式的值进行比较，比较的结果为布尔值True或False。例如： 2 = 3 False 2 3 True 2 3 False 2 = 3 False 2 4False，2=2 True（2）两个单字符字符串，则根据）两个单字符字符串，则根据Option Compare语句来指定是按字符的内部语句来指定是按字符的内部二进制表示比较还是按文本比较。二进制表示比较还是按文本比较。 Option Compa

34、re语句格式为：语句格式为：Option Compare Binary | Text Visual Basic按以下规则对表达式进行比较：按以下规则对表达式进行比较：63参数说明：参数说明：nBinary：根据字符的内部二进制值进行比：根据字符的内部二进制值进行比较。较。空格空格019ABZ ab A 的结果为True。 如果在模块的通用声明部分使用了语句 Option Compare Text 则关系表达式 a A 的结果为False。6465（3）如果是字符串，则根据当前的比较方式）如果是字符串，则根据当前的比较方式从第从第1个字符开始逐个比较。个字符开始逐个比较。 例如，在设置为例如，在

35、设置为Option Compare Binary或或没有该语句时：没有该语句时： abc Abc 结果为结果为True for Abc 结果为结果为False for fortran 结果为结果为True66（4）由于浮点数在计算机内不精确表示，在对）由于浮点数在计算机内不精确表示，在对浮点数进行比较时，应尽量避免直接判断浮点数进行比较时，应尽量避免直接判断两个浮点数是否相等，而改成对误差的判两个浮点数是否相等，而改成对误差的判断。断。 例如，要判断两个单精度型变量例如，要判断两个单精度型变量A和和B的值的值是否相等，可以将判断条件写成是否相等，可以将判断条件写成 Abs(A-B)0.0000

36、1（5）不要用连续的关系运算符来表示复合条件）不要用连续的关系运算符来表示复合条件 例如，要表示条件例如，要表示条件1x2，不应写成，不应写成 1 = x = 1 And x B) 结果为结果为 False A B And B C 结果为结果为True B A And B C 结果为结果为False A B Or B C 结果为结果为True B A Or B C 结果为结果为True A B) Xor (B C) 结果为结果为False(A B) Eqv (B C) 结果为结果为True(A B) Imp (B C) 结果为结果为False70例例1：数学中表示条件数学中表示条件“x是在区间是在区间a，b内内”，习惯上写成习惯上写成axb，在，在VB中应写成：中应写成： a=x And x=b例例2： 表示条件表示条件“M和和N之一为之一为5，但不能同时为，但不能同时为5”的布尔表达式为的布尔表达式为: m=5