VB程序设计代码基础.ppt

《VB程序设计代码基础.ppt》由会员分享，可在线阅读，更多相关《VB程序设计代码基础.ppt（61页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、第第三三章章 V VB B程程序序设设计计代代码码基基础础第第3 3章章VBVB程序设计代码基础程序设计代码基础本章要点本章要点:字符集字符集 数据类型数据类型常量、变量常量、变量常用内部函数常用内部函数运算符与表达式运算符与表达式1第第三三章章 V VB B程程序序设设计计代代码码基基础础命令格式中的符号约定命令格式中的符号约定 必选参数表示符。如缺少必选参数，则语句必选参数表示符。如缺少必选参数，则语句发生语法错误。发生语法错误。可选参数表示符。如方括号中的内容省略，可选参数表示符。如方括号中的内容省略，则则VB会使用该参数的缺省值。会使用该参数的缺省值。|多个取一表示符。分隔多个选择项，

2、必须选择多个取一表示符。分隔多个选择项，必须选择其中之一。其中之一。括起多个选择项。括起多个选择项。,同类项目的重复出现。同类项目的重复出现。省略了在当时叙述中不涉及的部分。省略了在当时叙述中不涉及的部分。注意注意：这些专用符号和其中的提示，不是语句行这些专用符号和其中的提示，不是语句行或函数的组成部分，在输入具体命令或函数时，或函数的组成部分，在输入具体命令或函数时，上述符号均不能作为语句的组成部分。上述符号均不能作为语句的组成部分。2第第三三章章 V VB B程程序序设设计计代代码码基基础础3.1 字符集字符集1.字符集字符集 使用使用Unicode字符集，其基本字符集包括字符集，其基本字

3、符集包括:数字数字:09 英文字母英文字母:az，AZ 特殊字符特殊字符:空格空格 ！#$%&()*+-/，.:;?_|等。等。2.关键字关键字 关键字又称为保留字关键字又称为保留字 VB自动将关键字的首字母转换为大写字母自动将关键字的首字母转换为大写字母 例如例如:PRINTPRINT 5+6 5+6 转换成转换成 PrintPrint 5+6 5+6 3第第三三章章 V VB B程程序序设设计计代代码码基基础础3标识符标识符 用于标记用户自定义的类型、常量、变量、过程、用于标记用户自定义的类型、常量、变量、过程、控件等的名字。标识符的命名规则如下：控件等的名字。标识符的命名规则如下：第一个

4、字符必须是字母第一个字符必须是字母。长度不超过长度不超过255个字符。控件、窗体、模块的个字符。控件、窗体、模块的名字不能超过名字不能超过40个字符。个字符。不可以包含小数点或者不可以包含小数点或者内嵌的类型声明字符内嵌的类型声明字符。不能使用关键字。不能使用关键字。例如，例如，Sum、Age、Average、stuName等都是合等都是合法的标识符。法的标识符。习惯上，将组成标识符的每个单词的首字母大写，习惯上，将组成标识符的每个单词的首字母大写，其余字母小写。其余字母小写。Visual Basic不区分标识符的大小写。不区分标识符的大小写。例如，标识符例如，标识符A1和标识符和标识符a1是

5、等价的。是等价的。4第第三三章章 V VB B程程序序设设计计代代码码基基础础3.2 数据类型数据类型基本数据类型：基本数据类型：数值型数值型字符串型字符串型布尔型布尔型日期型日期型对象型对象型可变类型可变类型用户自定义的数据类型用户自定义的数据类型基本数据类型基本数据类型分为分为5第第三三章章 V VB B程程序序设设计计代代码码基基础础3.2.1 数值型数据数值型数据Integer(整型整型)Long(长整型长整型)Single(单精度浮点型单精度浮点型)Double(双精度浮点型双精度浮点型)Currency(货币型货币型)Byte(字节型字节型)6第第三三章章 V VB B程程序序设设

6、计计代代码码基基础础1.整数类型整数类型(1)整型整型(Integer)以以2个字节存储个字节存储 十进制表示十进制表示:由由+-号，号，09 组成组成 范围范围:-3276832767 八进制表示八进制表示:以以&O开头，由开头，由 07组成组成 范围范围:&O0&O177777 十六进制表示十六进制表示:以以&H开头，由开头，由 09,AF组成组成 范围范围:&H0&HFFFF 例例:-325 0 56 +100&O456&O36&H1AC&H38&H27第第三三章章 V VB B程程序序设设计计代代码码基基础础(2)长整型长整型(Long)以以4个字节存储个字节存储 十进制表示十进制表示

7、:由由+-号，号，09 组成组成 范围范围:-2147483648+2147483647 八进制表示八进制表示:以以&O开头，以开头，以&结束结束 范围范围:&O0&O37777777777&十六进制表示十六进制表示:以以&H开头，以开头，以&结束结束 范围范围:&H0&HFFFFFFFF&例例:453466 -34568 +1000000&O456&O36&H1AC&H38&H2&8第第三三章章 V VB B程程序序设设计计代代码码基基础础2.实数类型实数类型 浮点数采用浮点数采用IEEE格式格式,由尾数及指数组成由尾数及指数组成:+|-.E|D+|-(1)单精度浮点型单精度浮点型(Sing

8、le)以以4个字节存储，可以精确到个字节存储，可以精确到7位十进制数位十进制数E+2 表示表示3.234 102 -28E9 表示表示-28 109E-17 表示表示4.56 10-17(2)双精度浮点型双精度浮点型(Double)以以8个字节存储，可以精确到个字节存储，可以精确到16位十进制数位十进制数D+2 表示表示3.234 102 -28D9 表示表示-28 109D-17 表示表示4.56 10-17尾数部分尾数部分指数部分指数部分e|d9第第三三章章 V VB B程程序序设设计计代代码码基基础础(3)货币型货币型(Currency)以以8个字节存储个字节存储 用于表示定点数，其小数

9、点左边有用于表示定点数，其小数点左边有15位数字，位数字，右边有右边有4位数字。位数字。3.字节型字节型(Byte)用一个字节存储数据，其取值范围为用一个字节存储数据，其取值范围为0255。10第第三三章章 V VB B程程序序设设计计代代码码基基础础3.2.2 字符串型数据字符串型数据(String)由双引号由双引号括起来的一串符号括起来的一串符号例例:abc ABC 计算机计算机 12.34 3+2 (空串空串)如果字符串本身包括双引号，可用连续两个双如果字符串本身包括双引号，可用连续两个双引号表示。引号表示。例例:要打印以下字符串：要打印以下字符串：You must study hard

10、,he said.在程序中需要将该字符串表示成在程序中需要将该字符串表示成:You must study hard,he said.11第第三三章章 V VB B程程序序设设计计代代码码基基础础3.2.3 布尔型数据布尔型数据(Boolean)用于表示某个条件的成立或不成立。用于表示某个条件的成立或不成立。只有只有True和和False两个值两个值12第第三三章章 V VB B程程序序设设计计代代码码基基础础3.2.4 日期型数据日期型数据(Date)用于表示日期和时间用于表示日期和时间 格式格式:#VB接受许多种日期时间格式接受许多种日期时间格式 例例:下面的下面的 Date/Time 值全

11、部有效。值全部有效。#3-6-93 13:20#March 27,1993 1:20am#Apr-2-93#14 April 1993#12/18/1999#3.2.5 对象型数据对象型数据(Object)以以4个字节存储，用于引用程序中的对象。个字节存储，用于引用程序中的对象。3.2.6 可变类型数据可变类型数据(Variant)可以包含任何类型的数据。可以包含任何类型的数据。13第第三三章章 V VB B程程序序设设计计代代码码基基础础3.2.7 枚举类型枚举类型用于建立名称与常量数值的关联。用于建立名称与常量数值的关联。枚举类型可以在窗体模块、标准模块或类模块枚举类型可以在窗体模块、标准

12、模块或类模块的通用声明部分声明。的通用声明部分声明。格式：格式：Public|Private Enum =常量表达式常量表达式1 =常量表达式常量表达式2 End Enum14第第三三章章 V VB B程程序序设设计计代代码码基基础础参数：参数：枚举类型名和各成员名应符合标识符的命名规枚举类型名和各成员名应符合标识符的命名规则。则。成员名用于定义该枚举类型的组成元素的名称。成员名用于定义该枚举类型的组成元素的名称。常量表达式：可选项，为各成员所对应的值常量表达式：可选项，为各成员所对应的值（为（为Long类型），可以是其他的枚举类型。类型），可以是其他的枚举类型。Public：为可选项。表示该

13、枚举类型在整个工程：为可选项。表示该枚举类型在整个工程中都是有效的。当省略中都是有效的。当省略Public和和Private时，默时，默认为认为Public。Private：为可选项。表示该枚举类型只在所声：为可选项。表示该枚举类型只在所声明的模块中是有效的明的模块中是有效的。15第第三三章章 V VB B程程序序设设计计代代码码基基础础说明：说明：1）在缺省常量表达式的情况下，枚举中的第一个）在缺省常量表达式的情况下，枚举中的第一个常量被初始化为常量被初始化为0，其后的常量则初始化为比，其后的常量则初始化为比其前面的常量大其前面的常量大1的数值。的数值。例：例：Public Enum Day

14、s Sunday 初始初始值为值为0 Monday 初始初始值为值为1 Tuesday Wednesday Thursday Friday Saturday End Enum16第第三三章章 V VB B程程序序设设计计代代码码基基础础2）可以使用赋值语句显式地给枚举中的常量赋值。）可以使用赋值语句显式地给枚举中的常量赋值。所赋的值可以是任何长整数，包括负数。所赋的值可以是任何长整数，包括负数。例：例：Public Enum WorkDays Saturday 初始化为初始化为0 Sunday=0 被赋值被赋值0 Monday 初始化为初始化为1 Tuesday Wednesday Thurs

15、day Friday Invalid=-1 被显式赋值为被显式赋值为-1End Enum 17第第三三章章 V VB B程程序序设设计计代代码码基基础础3）VB将枚举中的常量数值看作为长整数。如果将将枚举中的常量数值看作为长整数。如果将一个浮点数值赋给一个枚举中的常量，一个浮点数值赋给一个枚举中的常量，Visual Basic将该数值取整为最接近的长整数。将该数值取整为最接近的长整数。4）当向一个枚举中的常量赋值时，也可以使用另）当向一个枚举中的常量赋值时，也可以使用另一个枚举中的常量数值。一个枚举中的常量数值。Public Enum WorkDays Sunday=0 Monday Tues

16、day Wednesday Thursday Friday Saturday=6 Invalid=-1End Enum 18第第三三章章 V VB B程程序序设设计计代代码码基基础础5）声明枚举类型后，就可以声明该枚举类型的变量，）声明枚举类型后，就可以声明该枚举类型的变量，然后使用该变量存储枚举常量的数值。例：然后使用该变量存储枚举常量的数值。例：声明枚声明枚举类举类型的型的变变量量 Dim MyDay As WorkDays Saturday 的数的数值为值为0 MyDay=Saturday6）当引用单个常量时，为了避免混淆，应在常量名）当引用单个常量时，为了避免混淆，应在常量名称前冠以枚

17、举名。称前冠以枚举名。=&_ 7）VB提供了系统定义的枚举提供了系统定义的枚举vbDayOfWeek，它包，它包括了与星期的七天相对应的常量。括了与星期的七天相对应的常量。19第第三三章章 V VB B程程序序设设计计代代码码基基础础3.2.8 用户自定义类型用户自定义类型 是用户自己定义的类型，这种类型可以包含多是用户自己定义的类型，这种类型可以包含多个基本类型。使用个基本类型。使用Type语句定义。语句定义。Type语句格式：语句格式：Private|Public Type (下标下标)As End Type20第第三三章章 V VB B程程序序设设计计代代码码基基础础说明说明:1）、应遵

18、循标识应遵循标识符的命名规则。符的命名规则。可以是可以是Visual Basic系统系统提供的基本数据类型或已声明的用户自定义类提供的基本数据类型或已声明的用户自定义类型。缺省型。缺省Private|Public选项时，默认是选项时，默认是Public。2）用户自定义类型必须在窗体模块或标准模块的）用户自定义类型必须在窗体模块或标准模块的通用声明段进行声明。在窗体模块中定义用户通用声明段进行声明。在窗体模块中定义用户自定义类型时必须使用自定义类型时必须使用Private关键字。关键字。3）如果用户自定义类型的元素为）如果用户自定义类型的元素为数组数组，则需要使，则需要使用用参数。参数。4）在使

19、用用户自定义类型前，必须先声明用户自）在使用用户自定义类型前，必须先声明用户自定义类型的变量。定义类型的变量。21第第三三章章 V VB B程程序序设设计计代代码码基基础础引用用户自定义类型元素的格式：引用用户自定义类型元素的格式：.例：定义一个例：定义一个Students数据类型，该类型中的每一数据类型，该类型中的每一个数又包含了学生的个数又包含了学生的系系、班级班级、姓名姓名、年龄年龄信息。信息。定义格式为：定义格式为：Private Type Students Dept As String*20 系系 ClassNo As String*10 班班级级 Name As String 姓名

20、姓名 Age As Integer 年年龄龄End Type 22第第三三章章 V VB B程程序序设设计计代代码码基基础础 声明一个用户自定义类型的变量声明一个用户自定义类型的变量StudDim Stud As Students 给变量的元素赋值给变量的元素赋值=计算机系计算机系=软件软件2001-1=张三张三=18 输出各元素的值输出各元素的值Print Stud.Dept,23第第三三章章 V VB B程程序序设设计计代代码码基基础础5）如果两个变量都属于同一个用户自定义类型，）如果两个变量都属于同一个用户自定义类型，也可以将其中一个变量赋给另一个变量。这种也可以将其中一个变量赋给另一个

21、变量。这种赋值是将一个变量的所有元素赋给另一个变量赋值是将一个变量的所有元素赋给另一个变量的对应元素。的对应元素。例：例：Dim Stud1 As Students,Stud2 As Students Stud2=Stud124第第三三章章 V VB B程程序序设设计计代代码码基基础础6）用户自定义类型可以包含其他的用户自定义类型。）用户自定义类型可以包含其他的用户自定义类型。例：例：Private Type Address Addr As String 地址地址 Zip As Integer 邮邮政政编码编码 Phone As String 电话电话 End Type Private Typ

22、e Student Name As String 姓名姓名 Age As Byte 年年龄龄 TosAddr As Address 声明声明为为Address的的变变量量 End Type25第第三三章章 V VB B程程序序设设计计代代码码基基础础3.3 常量常量 指在程序运行期间其值指在程序运行期间其值不发生变化不发生变化的量。的量。两种形式两种形式:直接常量；符号常量直接常量；符号常量3.3.1 直接常量直接常量 例例:欢迎使用欢迎使用Visual Basic 字符串常量字符串常量 12345 数值型常量数值型常量 True 布尔型常量布尔型常量#11/10/2001#日期型常量日期型常

23、量3.3.2 用户自定义符号常量用户自定义符号常量 格式格式:Const As =类型类型:Integer Long Single Double String String*n Boolean Date Currency Byte Variant26第第三三章章 V VB B程程序序设设计计代代码码基基础础例例:Const Max As Integer=9 Const BirthDate=#1/1/01#Const MyString=friend 用逗号分隔多个常量声明用逗号分隔多个常量声明,Max=9,MyStr=Hello 用先前定义过的常量定义新常量用先前定义过的常量定义新常量 Cons

24、t Pi2=Pi*2 表达式中不能使用内部函数表达式中不能使用内部函数 Const sinx=Sin(20*3.14/180)使用使用:在程序中引用在程序中引用 如如:AREA=Pi*R2 在程序中不可修改在程序中不可修改 如如:27第第三三章章 V VB B程程序序设设计计代代码码基基础础 VB内部已定义，可以直接使用的常量内部已定义，可以直接使用的常量 查看内部常量查看内部常量:视图视图对象浏览器对象浏览器 选择库、类、选择库、类、成员成员 如如:库库 VBRUN 类类 ColorConstants ShapeConstants 成员成员 Vbred vbShapeCircle 例例:Pr

25、ivate Sub Form_Activate()Const A As String=各种常量的使用各种常量的使用 Form1.BackColor=vbGreen Form1.ForeColor=vbRed Form1.FontSize=14 Print A End Sub3.3.3 系统定义符号常量系统定义符号常量28第第三三章章 V VB B程程序序设设计计代代码码基基础础3.4 变量变量一个有名称的内存单元称为变量。一个有名称的内存单元称为变量。5A1.什么是变量？什么是变量？程序执行期间，用变量临时存储数值。程序执行期间，用变量临时存储数值。变量的值可以发生变化。变量的值可以发生变化。

26、每个变量都有每个变量都有名称名称和和数据类型数据类型。29第第三三章章 V VB B程程序序设设计计代代码码基基础础2.变量的命名遵循标识符的命名规则，即变量的命名遵循标识符的命名规则，即第一个字符必须是字母第一个字符必须是字母 长度不超过长度不超过255个字符个字符 不可以包含小数点或者不可以包含小数点或者内嵌的类型声明字符内嵌的类型声明字符 不能使用关键字不能使用关键字 不能与过程名或符号常量同名不能与过程名或符号常量同名例例:Student1 MyName intMax strName 不区分大小写不区分大小写；变量名应便于识别、记忆；变量名应便于识别、记忆30第第三三章章 V VB B

27、程程序序设设计计代代码码基基础础3.变量的声明变量的声明(1)显式声明显式声明格式格式:Dim|Private|Public|Static As As 说明：说明：Dim:在窗体模块、在窗体模块、标准模块标准模块或或过程过程中声明变量。中声明变量。Private:在窗体模块或标准模块中声明变量，使在窗体模块或标准模块中声明变量，使变量仅在该模块中有效。变量仅在该模块中有效。Public:在标准模块中声明全局变量，使变量在在标准模块中声明全局变量，使变量在整个应用程序中有效。整个应用程序中有效。Static:在过程中定义静态变量，即使该过程结在过程中定义静态变量，即使该过程结束，也仍然保留变量的

28、值。束，也仍然保留变量的值。31第第三三章章 V VB B程程序序设设计计代代码码基基础础例例:Dim Sum As Long Dim Address As String Dim No As String*8 Private b As Integer Dim Num,Total As Integer Num为可变类型为可变类型 Public Average As Single Static A As Long(2)隐式声明隐式声明 可变类型。易出错、浪费空间可变类型。易出错、浪费空间(3)强制显式声明强制显式声明 在模块的声明段中使用语句在模块的声明段中使用语句:Option Explicit

29、 如果设置如果设置:工具工具选项选项编辑器编辑器 要求变量声要求变量声明明 则在后续模块中自动插入则在后续模块中自动插入Option Explicit32第第三三章章 V VB B程程序序设设计计代代码码基基础础例例:窗体模块和过程中使用窗体模块和过程中使用 Dim语句的区别。语句的区别。设在窗体中放置按钮设在窗体中放置按钮Command1和和Command2 Dim a As Integer Private Sub Command1_Click()a=a+10 Print a End Sub Private Sub Command2_Click()a=a+15 Print a End Sub

30、 观察程序运行结果观察程序运行结果将将Dim a As Integer放到过程内，观察运行结果。放到过程内，观察运行结果。33第第三三章章 V VB B程程序序设设计计代代码码基基础础例例:Static的作用。的作用。设在窗体中放置按钮设在窗体中放置按钮C1Private Sub C1_Click()Static a As Integer a=a+10 Print aEnd SubPrivate Sub C1_Click()Dim a As Integer a=a+10 Print aEnd Sub运行时，多次单击命令按钮运行时，多次单击命令按钮C1，比较以上两个事件过程的执行效果比较以上两个

31、事件过程的执行效果34第第三三章章 V VB B程程序序设设计计代代码码基基础础3.5 常用内部函数常用内部函数 函数形式函数形式:函数名函数名()参数：参数：常量、变量或表达式。常量、变量或表达式。若有多个参数，参数之间若有多个参数，参数之间以逗号分隔以逗号分隔。函数值：也叫函数值：也叫“返回值返回值”函数的使用：函数的使用：函数在表达式中被调用。函数在表达式中被调用。函数分类函数分类内部函数内部函数用户自定义函数用户自定义函数35第第三三章章 V VB B程程序序设设计计代代码码基基础础例例:Fix(45.67)结果为结果为45 Int(45.67)结果为结果为45 Fix(-2.89)结

32、果为结果为-2 Int(-2.89)结果为结果为-3 Abs(-4)结果为结果为4 Log(10)Sgn(3)结果为结果为1 Sgn(-6)结果为结果为-1 Sgn(0)结果为结果为0例例:求求sin300 Sin(30*3.14/180)参数以弧度为单位参数以弧度为单位 3.5.1 数学函数数学函数36第第三三章章 V VB B程程序序设设计计代代码码基基础础例例:判断一个整数判断一个整数Y能否被另一个整数能否被另一个整数X整除整除 如果如果 Int(Y/X)=Y/X 则整除则整除例例:常用对数常用对数log10X的求法的求法 用换底公式用换底公式:即即:Log(X)/Log(10)例例:求

33、求e3 正确正确:Exp(3)错误错误:e3(错错)37第第三三章章 V VB B程程序序设设计计代代码码基基础础例例:LTrim(ABC)结果为结果为ABC表示空格表示空格RTrim(ABC)结果为结果为ABCTrim(ABC)结果为结果为ABCLeft(ABCDE,2)结果为结果为ABRight(ABCDE,2)结果为结果为DEMid(ABCDE,2,3)结果为结果为BCDMid(ABCDE,2,6)结果为结果为BCDELen(ABCDE)结果为结果为5String(3,ABC)结果为结果为AAAString(3，65)结果为结果为AAAInStr(ABCDECDE,DE)结果为结果为4I

34、nStr(5,ABCDECDE,DE)结果为结果为7UCase(Abc)结果为结果为ABCLCase(ABc)结果为结果为abc3.5.2 字符串函数字符串函数38第第三三章章 V VB B程程序序设设计计代代码码基基础础1.随机函数随机函数 Rnd(x)产生产生0,1)之间的单精度随机数。之间的单精度随机数。x0:以上一个随机数作种子，产生序列中的下以上一个随机数作种子，产生序列中的下一个随机数。一个随机数。x=0:产生与最近生成的随机数相同的数。产生与最近生成的随机数相同的数。省略省略x:同同x02.Randomize语句语句 初始化随机数发生器，格式：初始化随机数发生器，格式：Rando

35、mizen n:种子，省略时以系统时间作为种子种子，省略时以系统时间作为种子3.5.3 随机函数随机函数39第第三三章章 V VB B程程序序设设计计代代码码基基础础 生成生成a,b 范围内的随机范围内的随机整数整数 Int(b-a+1)*Rnd+a)例：生成例：生成1,99之间的随机整数的表达式为：之间的随机整数的表达式为：Int(99*Rnd+1)例：生成例：生成(1,99)之间的随机整数的表达式为：之间的随机整数的表达式为：Int(97*Rnd+2)40第第三三章章 V VB B程程序序设设计计代代码码基基础础例例:Asc(A)结果为结果为65 Asc(ABC)结果为结果为65 Chr(

36、65)结果为结果为A Str(123)结果为结果为123 Str(-123)结果为结果为-123 Val(123)结果为结果为123 Val(123AB)结果为结果为123 Val(.123AB)Val(a123AB)结果为结果为0 Val(12E2ABC)结果为结果为12003.5.4 转换函数转换函数41第第三三章章 V VB B程程序序设设计计代代码码基基础础 Hex(27)结果为结果为1B Hex(45.7)结果为结果为2E Oct(27)结果为结果为33 Oct(45.7)结果为结果为56 CInt(5.3)结果为结果为5 CInt(-5.7)结果为结果为-6 CInt(32766.

37、6)结果为结果为32767 CInt(32767.8)溢出错误溢出错误 CInt(0.5)结果为结果为0 CLng(10.5)结果为结果为10 CSng(123.56789)结果为结果为 CDbl(123.56789)结果为结果为 42第第三三章章 V VB B程程序序设设计计代代码码基基础础 CCur(123.56789)结果为结果为 CBool(5.8*4)结果为结果为True CBool(-5.8)结果为结果为True CBool(0)结果为结果为False CBool(12)结果为结果为True CBool(0)结果为结果为False CBool(abc)出错出错 43第第三三章章 V

38、 VB B程程序序设设计计代代码码基基础础3.5.5 日期和时间函数日期和时间函数Now：返回系统日期和时间。：返回系统日期和时间。Date：返回系统日期。：返回系统日期。Time：返回系统时间。：返回系统时间。Day(d)：返回参数：返回参数d中指定的日期是月份中的第中指定的日期是月份中的第几天。几天。WeekDay(d)：返回参数：返回参数d中指定的日期是星期几。中指定的日期是星期几。Month(d)：返回参数：返回参数d中指定日期的月份。中指定日期的月份。Year(d)：返回年份。：返回年份。返回系统的日期和时间、或返回指定日期和时返回系统的日期和时间、或返回指定日期和时间的一部分。间的

39、一部分。44第第三三章章 V VB B程程序序设设计计代代码码基基础础Hour(d)：返回小时（：返回小时（023）。）。Minute(d)：返回分钟（：返回分钟（059）。）。Second(d)：返回秒（：返回秒（059）。）。Timer：返回从午夜开始到现在经过的秒数。：返回从午夜开始到现在经过的秒数。45第第三三章章 V VB B程程序序设设计计代代码码基基础础例例:Format(123.45,0000.000)结果为结果为0123.450 Format(123.45,0.0)结果为结果为123.5 Format(123.45,#.#)结果为结果为123.45 Format(123.45

40、,#.#)结果为结果为123.5 Format(0.123,.#)结果为结果为.12 Format(0.123,0.#)结果为结果为0.12 Format(HELLO,)结果为结果为THIS IS IT 注注:经经Format函数格式化后的结果为字符串类型函数格式化后的结果为字符串类型例例:Format(123)+Format(456)结果为结果为123456区别区别:Str(123)+Str(456)结果为结果为1234563.5.6 格式输出函数格式输出函数46第第三三章章 V VB B程程序序设设计计代代码码基基础础 Shell函数用于调用函数用于调用Windows下的应用程序。下的应用

41、程序。格式：格式：Shell(,)参数：参数：:要执行的可执行文件名，包含路径要执行的可执行文件名，包含路径。:决定程序运行时窗口的样式。如果决定程序运行时窗口的样式。如果省略，则程序以具有焦点的最小化省略，则程序以具有焦点的最小化窗口执行。取值见窗口执行。取值见P54表表3-1。3.5.7 Shell函数函数 例：运行时单击窗体，打开计算器：例：运行时单击窗体，打开计算器：Private Sub Form_Click()Shell c:winntsystem32calc.exe,vbNormalFocus End Sub这里这里Shell函数以语句形式出现，没有返回值。函数以语句形式出现，没

42、有返回值。47第第三三章章 V VB B程程序序设设计计代代码码基基础础3.6 运算符与表达式运算符与表达式 操作数操作数:常量、变量、函数、对象常量、变量、函数、对象 运算符运算符:圆括号圆括号 算术运算符（算术表达式）算术运算符（算术表达式）字符串运算符（字符串表达式）字符串运算符（字符串表达式）关系运算符（关系表达式）关系运算符（关系表达式）布尔运算符（布尔表达式）布尔运算符（布尔表达式）48第第三三章章 V VB B程程序序设设计计代代码码基基础础3.6.1 算术运算符与算术表达式算术运算符与算术表达式优先级优先级运算符运算符运算运算示例示例1乘方乘方322-取负取负-93*乘法乘法3

43、*53/浮点除法浮点除法10/34 整数除法整数除法10/35Mod取模取模10 mod 36+加法加法2+36-减法减法2-3书书 写写:一条线、无一条线、无 、无、无 49第第三三章章 V VB B程程序序设设计计代代码码基基础础例例:将以下表达式写成将以下表达式写成VB合法的表达式合法的表达式(xy)za1+a2a-b+a(-b)a1+a2 a(-b)+a*(-b)(xy)z a(1/n)y/(-x)+x/(-y)A/(4+(8/(3+B)50第第三三章章 V VB B程程序序设设计计代代码码基基础础1.乘方运算乘方运算 例例:102 10的平方，结果为的平方，结果为100 10(-2)

44、223 运算顺序从左到右，结果为运算顺序从左到右，结果为64 (-8)(-1/3)错误错误,当底数为负时当底数为负时,指数应为整数指数应为整数2.整数除法整数除法 例例:104 结果为结果为2 25.686.99 先四舍五入再整除，结果为先四舍五入再整除，结果为33.取模运算取模运算 例例:10 Mod 4 结果为结果为2 25.68 Mod 6.99 先四舍五入再求余数先四舍五入再求余数,结果为结果为5 11 Mod 4 结果为结果为3 -11 Mod 5 结果为结果为-1 -11 Mod-3 结果为结果为-2结果符号同第结果符号同第一个操作数一个操作数51第第三三章章 V VB B程程序序

45、设设计计代代码码基基础础 字符串运算符有两个字符串运算符有两个:&+&：自动将两侧的操作数作为字符进行连接：自动将两侧的操作数作为字符进行连接例例:Hello&World 结果为结果为Hello World Check&123 结果为结果为Check123 123&456 结果为结果为123456 123&456 结果为结果为123456：仅当两侧操作数都为字符串时才做字符串连接：仅当两侧操作数都为字符串时才做字符串连接 123+456 结果为结果为579 123+456 结果为结果为579 123+456 结果为结果为123456 Check+123 错误错误3.6.2 字符串运算符与字符串

46、表达式字符串运算符与字符串表达式52第第三三章章 V VB B程程序序设设计计代代码码基基础础1.关系运算符（比较运算符）关系运算符（比较运算符）（小于）（小于）（大于）（大于）=（大于或等于）（大于或等于）=（等于）（等于）（不等于）（不等于）2.关系表达式关系表达式:2 例：例：X Y+ZX Y+Z A=5 A=5 StudName Shelly StudName Shelly3.6.3 关系运算符与关系表达式关系运算符与关系表达式53第第三三章章 V VB B程程序序设设计计代代码码基基础础3.如何比较如何比较数值比较数值比较 按数值大小按数值大小单字符比较单字符比较 在模块的通用声明部

47、分使用语句在模块的通用声明部分使用语句 Option Compare Binary 缺省状态下，则按字符的内部二进制表示比较，缺省状态下，则按字符的内部二进制表示比较，典型的二进制排序顺序如下：典型的二进制排序顺序如下：019 AB Z abz字符串比较：字符串比较：根据当前的比较方式根据当前的比较方式从左开始逐个从左开始逐个比较比较54第第三三章章 V VB B程程序序设设计计代代码码基基础础4.比较结果比较结果:True False例例:45 35 结果为结果为 False 45=45 结果为结果为True 4 3 结果为结果为True abc cdf 结果为结果为False for fo

48、rtran 结果为结果为True 例例:要判断两个单精度型变量要判断两个单精度型变量A和和B的值是否相等，的值是否相等，可以用下式判断可以用下式判断:Abs(A-B)例如例如:要判断要判断1除以除以3是否等于是否等于0.3333，可写成：，可写成：Abs(1/3-0.3333)1E-555第第三三章章 V VB B程程序序设设计计代代码码基基础础1.布尔布尔运算符运算符:Not And Or2.布尔表达式布尔表达式:23.优先级优先级:NotAndOr例例:A=10:B=8:C=6。Not(A B)结果为结果为 False Not(B A)结果为结果为True A B And B C 结果为结

49、果为True B A And B C 结果为结果为False A B Or B C 结果为结果为True B A Or B C 结果为结果为True A B Or B=C 结果为结果为False3.6.4 布尔运算符与布尔表达式布尔运算符与布尔表达式56第第三三章章 V VB B程程序序设设计计代代码码基基础础例例:将以下条件写成将以下条件写成VB布尔表达式布尔表达式 1.m1-n1jm1+n1 2.X 5 3.M和和N之一为之一为5，但不能同时为，但不能同时为5 4.-100k=M1-N1)And(J=M1+N1)2.(X 5.0)3.(M=5)And(N5)Or(M 5)And(N=5)4

50、.(K -100)And(K 100)And(K Mod 2=0)5.(X 0)And(X-1.0)*(X-2.0)=0.0)57第第三三章章 V VB B程程序序设设计计代代码码基基础础 ()函数运算函数运算算术运算算术运算关系运算关系运算布尔运算布尔运算例：设例：设a=3，b=5，c=-1，d=7，求以下表达式的值。求以下表达式的值。FalseTrue False TrueTrue6 True False Falsea+b c+d And a=5 Or Not c 0 Or d 083.6.5 表达式的运算顺序表达式的运算顺序58第第三三章章 V VB B程程序序设设计计代代码码基基础础3