VB程序设计3VisualBasic语言基础

《VB程序设计3VisualBasic语言基础》由会员分享，可在线阅读，更多相关《VB程序设计3VisualBasic语言基础（56页珍藏版）》请在装配图网上搜索。

1、12VB程序程序程序代码程序代码窗体界面窗体界面某些信息的说明某些信息的说明过程过程事件过程事件过程通用过程通用过程Function过程过程Sub过程过程3指附在对象上的程序代码，是事件的处理程序，由事件调用。事件过程存储在窗体模块（.frm)中。形式：形式：Private Sub 对象名对象名_事件过程名事件过程名(参数列表参数列表)（事件过程代码）（事件过程代码）End Sub例如：Private Sub CmdOK_Click()MsgBox“你好”End Sub1、事件过程（、事件过程（Private）4可被可被共享的代码共享的代码构成的过程，即该代码可被不同构成的过程，即该代码可被不

2、同的窗体所共享，或被一个窗体中不同的事件所共的窗体所共享，或被一个窗体中不同的事件所共享。由事件过程或其他通用过程调用。享。由事件过程或其他通用过程调用。形式：形式：Public/Private Static Sub 过程名过程名(参数列表参数列表)（语句块（语句块）End Sub2、通用过程（、通用过程（Public/Private）5 窗体模块窗体模块(.FRM)窗体内的窗体内的事件过程事件过程、窗体及窗体中各个控件、窗体及窗体中各个控件对象的属性对象的属性和相关和相关说明说明。标准模块标准模块(.BAS)通用过程及相关说明通用过程及相关说明。创建方法：工程创建方法：工程添加模块添加模块输

3、入代码输入代码 类模块（不作要求）类模块（不作要求）6工程工程.VBP窗体模块窗体模块.FRM标准模块标准模块.BAS窗体模块窗体模块.FRM标准模块标准模块.BAS通用声明通用声明部分部分通用声明通用声明部分部分通用过程通用过程部分部分通用过程通用过程部分部分事件过程事件过程部分部分事件过程事件过程部分部分通用声明通用声明部分部分通用声明通用声明部分部分通用过程通用过程部分部分通用过程通用过程部分部分7 语句体语句体 语句的一般形式：语句的一般形式：语句的功能语句的功能（没有或省略）（没有或省略）具体操作和说明具体操作和说明例如：例如：Dim a As Integer8 VB代码中不区分字母

4、大小写代码中不区分字母大小写为了提高程序的可读性，为了提高程序的可读性，VB对用户程序代对用户程序代码进行自动转换。码进行自动转换。对于对于VB中的关键字，首字母总被转换成大中的关键字，首字母总被转换成大写，其余字母被转换成小写。写，其余字母被转换成小写。若关键字由多个英文单词组成，自动将每个若关键字由多个英文单词组成，自动将每个单词的首字母转换成大写。单词的首字母转换成大写。9 语句书写自由语句书写自由在同一行上可以书写多条语句，语句间用在同一行上可以书写多条语句，语句间用:(:(西文冒号西文冒号)分隔。分隔。单行语句可分若干行书写，在本行后加入续行符单行语句可分若干行书写，在本行后加入续行

5、符空格和下划线空格和下划线“_”_”。一行允许多达一行允许多达255255个字符。个字符。例如：例如：X=10:Y=20:Z=30Dim Name As String，Age As Integer，Sex As _ Boolean，ID As String10注释有利于程序的维护和调试，方法有：注释有利于程序的维护和调试，方法有：Rem 必须单独一行书写必须单独一行书写 可单独一行，也可在语句后书写可单独一行，也可在语句后书写 在工具栏上右击，在快捷菜单中选择在工具栏上右击，在快捷菜单中选择“编辑编辑”菜菜单，其中有单，其中有“设置注释块设置注释块”、“解除注释块解除注释块”两两个按钮。个按钮

6、。注注 释释Private Sub CmdOK_Click()Rem 2003年年1月编写如下代码月编写如下代码 若用户单击了确认按钮，则执行下列代码若用户单击了确认按钮，则执行下列代码 End Sub113.2 Visual Basic 数据类型 整数整数 整数是不带小数点和指数符号的数，在机器内整数是不带小数点和指数符号的数，在机器内以二进制补码形式表示。以二进制补码形式表示。整型（整型（Integer）：整型以）：整型以两个字节两个字节的二进制的二进制码表示和参加运算，取值范围为码表示和参加运算，取值范围为-3276832767。长整型（长整型（Long）：长整型以）：长整型以四个字节四

7、个字节的二进的二进制码表示和参加运算，取值范围为制码表示和参加运算，取值范围为-21474836482147483647。123.2 Visual Basic 数据类型 浮点数浮点数 浮点数也称实型数或实数，是带有小数部分的浮点数也称实型数或实数，是带有小数部分的数值。它由三部分组成：符号、指数和尾数。数值。它由三部分组成：符号、指数和尾数。单精度型（单精度型（Single）：以）：以4个字节存储，符号个字节存储，符号1位，指数位，指数8位，尾数位，尾数23位，位，1位隐含位。用位隐含位。用E来来表示指数。例如：表示指数。例如：-9.654E-6 双精度型（双精度型（Double）：以）：以8

8、个字节存储，符号个字节存储，符号1位，指数位，指数11位，尾数位，尾数52位，位，1位隐含位。用位隐含位。用D来表示指数。例如：来表示指数。例如：-8.573264907D-15133.2 Visual Basic 数据类型 字节型（字节型（Byte）字节实际上是一种数值类型，以一个字节的无字节实际上是一种数值类型，以一个字节的无符号二进制数存储，取值范围为符号二进制数存储，取值范围为0255。布尔型（布尔型（Boolean）布尔型是一个逻辑值，用两个字节存储，它只布尔型是一个逻辑值，用两个字节存储，它只有两种值，即有两种值，即True（真）或（真）或False（假）。（假）。对象型（对象型（

9、Object）对象型数据用来表示图形或对象型数据用来表示图形或OLE对象或其他对对象或其他对象，用象，用4个字节存储。个字节存储。143.2 Visual Basic 数据类型 字符串型（字符串型（String）字符串是一个字符序列，由字符串是一个字符序列，由ASCII字符组成，包括字符组成，包括标准的标准的ASCII字符和扩展字符和扩展ASCII字符及汉字等。字符及汉字等。字符串是放在字符串是放在双引号双引号内的若干个字符，长度为内的若干个字符，长度为0的的字符串称为空字符串。字符串称为空字符串。VB中的字符串分为两种，即中的字符串分为两种，即变长字符串变长字符串和和定长字定长字符串符串。变

10、长字符串的长度是不确定的，最大长度不。变长字符串的长度是不确定的，最大长度不超过超过231；定长字符串的长度是固定的，最大长度不；定长字符串的长度是固定的，最大长度不超过超过216。153.2 Visual Basic 数据类型 货币型（货币型（Currency）货币数据类型是为表示钱款而设置的。该类货币数据类型是为表示钱款而设置的。该类型数据以型数据以8个字节存储，精确到小数点后四个字节存储，精确到小数点后四位，小数点前有位，小数点前有15位，小数点后位，小数点后4位以后的位以后的数字将被舍去。数字将被舍去。浮点数中的小数点是浮点数中的小数点是“浮动浮动”的，而货币类的，而货币类型数据的小数

11、点是固定的。型数据的小数点是固定的。变体型（变体型（Variant）变体数据类型是一种可变的数据类型，可以变体数据类型是一种可变的数据类型，可以表示任何值，包括数值、字符串及日期等。表示任何值，包括数值、字符串及日期等。163.2 Visual Basic 数据类型 日期型（日期型（Date）日期型数据用来表示日期信息，格式为日期型数据用来表示日期信息，格式为mm/dd/yyyy或或mm-dd-yyyy。表示范围：表示范围：1000年年1月月1日到日到9999年年12月月31日。日。任何可辨认的文本日期都可以赋值给日期变任何可辨认的文本日期都可以赋值给日期变量。日期文字必须用符号量。日期文字必

12、须用符号#括起来，括起来，如如#3/18/2003#12:30:45#17不同数据类型占用空间比较112123412345678ByteInteger BooleanLong Single ObjectDouble Date Currency字节字节18 常量常量 在程序中取值在程序中取值始终保持不变始终保持不变的数据，的数据，可以是具体的数值，也可以是专门说明可以是具体的数值，也可以是专门说明的符号。（的符号。（10、PI）变量变量 以符号形式出现在程序中，且取值以符号形式出现在程序中，且取值可以发生可以发生变化变化的数据。的数据。3.3 常量与变量193.3.1 常量（1）数值常量数值常量

13、 整型和长整型均有三种表示方式，即十进整型和长整型均有三种表示方式，即十进制，十六进制和八进制。制，十六进制和八进制。十进制：十进制：09，正负号组成。，正负号组成。八进制八进制：07，正负号组成。表示时在前面，正负号组成。表示时在前面加上加上&O。如：如：&O37相当于十进制数相当于十进制数3*8+7=31 十六进制：十六进制：09，AF，正负号组成。表示，正负号组成。表示时在前面加上时在前面加上&H。如：如：&H3D相当于十进制数相当于十进制数3*16+13=61 浮点型由尾数、指数符号和指数组成。如：浮点型由尾数、指数符号和指数组成。如：单精度：单精度：-9.654E-6 双精度：双精度

14、：3.1415926D820字符串常量字符串常量：不能超过：不能超过65535个字符。个字符。如如“Hello”、“1234.343”、“苏州苏州”逻辑型常量逻辑型常量：只有两个（：只有两个（True、False）日期型常量日期型常量：#2/25/2003#3.3.1 常量（2）21 符号常量符号常量Public|PrivateConst 常量名常量名 As Type=Public表示常量可在整个工程中使用表示常量可在整个工程中使用Private表示常量只在声明的窗体模块或标准模表示常量只在声明的窗体模块或标准模块中使用块中使用Type表示常量的类型表示常量的类型如：如：Const Tax A

15、s Single=1.05Const Pi=3.1415926Public Const Num As Integer=453.3.1 常量（3）22窗体模块窗体模块Const a1=3.1415926 仅在本窗体模块中有效仅在本窗体模块中有效Private Const b1=4 仅在本窗体模块中有效仅在本窗体模块中有效Public Const c1=5 出错，不能出现在窗体模块中出错，不能出现在窗体模块中Private Sub Command1_Click()Const d1=3 该常量仅在本事件过程中有效该常量仅在本事件过程中有效 Private Const e1=4 出错，不能在过程中使用

16、出错，不能在过程中使用 Public Const f1=5 出错，只能出现在标准模块中出错，只能出现在标准模块中End Sub23Const a2=3 该常量在本标准模块中有效该常量在本标准模块中有效Private Const b2=4 该常量在本标准模块中有效该常量在本标准模块中有效Public Const c2=5 该常量在整个工程中有效该常量在整个工程中有效Public/Private Sub Fun()Const d3=3 该常量仅在本通用过程中有效该常量仅在本通用过程中有效 Private Const e3=4 出错出错 Public Const f3=5 出错出错End Sub标准

17、模块标准模块24类型说明符说明符说明符示例示例含义含义%X%Integer&X&Long!X!Single#X#DoubleXCurrency$X$String字节、布尔、日期、对象及变体型没有类型说明符。字节、布尔、日期、对象及变体型没有类型说明符。声明常量和变量时也可以使用类型说明符。声明常量和变量时也可以使用类型说明符。Const One%=1 等价于等价于 Const One As Integer=1 253.3.2 变量 变量是内存单元的映射，变量名即为内存单元变量是内存单元的映射，变量名即为内存单元地址的映射。地址的映射。一个有名称的内存位置叫变量。一个有名称的内存位置叫变量。变量

18、的三要素：变量的三要素：变量名变量名 变量类型变量类型 变量的值变量的值26变量名的命名规则 变量名只能由字母、数字、汉字和下划线组成变量名只能由字母、数字、汉字和下划线组成 必须以字母开头，大小写等价必须以字母开头，大小写等价 长度不超过长度不超过255 作用域内唯一作用域内唯一 不能和不能和VB保留字重名保留字重名 不能含有标点符号，类型说明符只能出现在名不能含有标点符号，类型说明符只能出现在名称的最后称的最后27定义变量 显式定义显式定义 Dim 变量名变量名 As 类型类型，变量名，变量名 As 类型类型 Public 变量名变量名 As 类型类型，变量名，变量名 As 类型类型 Pr

19、ivate 变量名变量名 As 类型类型，变量名，变量名 As 类型类型 Static 变量名变量名 As 类型类型，变量名，变量名 As 类型类型 隐式定义隐式定义 将类型说明符放在变量名最后将类型说明符放在变量名最后例如：例如：Country$=“China”，k%=1 等价于等价于Dim Country As String，k As IntegerCountry=“China”:k=1 如果变量未被显式或隐式定义则为变体型。如果变量未被显式或隐式定义则为变体型。注意：注意：Dim a，b As Integer，则，则b为整型，而为整型，而a则为变体型。则为变体型。283.3.3 变量作用

20、域与生命周期 过程级变量过程级变量：又称：又称局部变量局部变量。在过程中说明，仅在。在过程中说明，仅在说明它的过程中有效。说明它的过程中有效。窗体模块级、标准模块级变量窗体模块级、标准模块级变量：在窗体模块或标准：在窗体模块或标准模块的通用声明中说明，在该窗体模块或标准模块模块的通用声明中说明，在该窗体模块或标准模块的所有过程内有效。的所有过程内有效。全局变量全局变量：又称：又称公有变量公有变量。在窗体模块或标准模块。在窗体模块或标准模块的通用声明中说明，在工程内有效。的通用声明中说明，在工程内有效。使用使用Dim语句声明变量时，系统自动给该变量赋一语句声明变量时，系统自动给该变量赋一个初值。

21、若为数值型，则值为个初值。若为数值型，则值为0；若为字符串型，；若为字符串型，则值为空串则值为空串;若为布尔型，则值为若为布尔型，则值为False。29Dim a1 As Integer 窗体级变量，在该窗体内有效窗体级变量，在该窗体内有效Public b1 As Integer 全局变量，在工程内有效全局变量，在工程内有效Private c1 As Integer 窗体级变量，在该窗体内有效窗体级变量，在该窗体内有效Static d1 As Integer 出错出错Public S1 As StringPrivate S2 As StringPublic S3 As String*5 出错出

22、错Private S4 As String*5Private Sub Command1_Click()Dim e1 As Integer 过程级变量，只在该事件过程内有效过程级变量，只在该事件过程内有效 Public f1 As Integer 出错出错 Private g1As Integer 出错出错 Static h1 As Integer 静态变量，只在该事件过程内有静态变量，只在该事件过程内有End Sub窗体模块窗体模块30Dim a2 As Integer 模块级变量，在该模块内有效模块级变量，在该模块内有效Public b2 As Integer 全局变量，在工程内有效全局变量

23、，在工程内有效Private c2 As Integer 模块级变量，在该模块内有效模块级变量，在该模块内有效Static d2 As Integer 出错出错Public S1 As StringPrivate S2 As StringPublic S3 As String*5 Private S4 As String*5Public/Private Sub Fun()Dim e2 As Integer 过程级变量，只在该通用过程内有效过程级变量，只在该通用过程内有效 Public f2 As Integer 出错出错 Private g2 As Integer 出错出错 Static h2

24、 As Integer 静态变量，只在该通用过程内有效静态变量，只在该通用过程内有效End Sub标准模块标准模块31定长字符串的定义 系统默认的字符串是变长的。系统默认的字符串是变长的。定长字符串的定义方法为：定长字符串的定义方法为：Dim 变量名变量名 As String*size 如果在给定长字符串变量赋值时，字符数未达到如果在给定长字符串变量赋值时，字符数未达到定义的长度，则用空格填补；如果字符数超过定定义的长度，则用空格填补；如果字符数超过定义的长度，则多余的部分将会被自动截去。义的长度，则多余的部分将会被自动截去。在在标准模块标准模块中定长字符串可说明为中定长字符串可说明为Publ

25、ic或或Private；在在窗体模块窗体模块中只能说明为中只能说明为Private。32Option Exlicit语句 变量可以不用定义就可使用。变量可以不用定义就可使用。没有定义的变量默认为局部变量。没有定义的变量默认为局部变量。为了安全起见，最好能显式地定义程序中所使为了安全起见，最好能显式地定义程序中所使用到的变量。用到的变量。Option Explicit语句的作用是防止未显式定义的语句的作用是防止未显式定义的变量直接使用。变量直接使用。Option Explicit语句写在（通用）语句写在（通用）-（声明）下。（声明）下。可以通过可以通过“工具工具”菜单中的菜单中的“选项选项”进行

26、设置进行设置333.4 常用系统函数 函数是一种特殊的运算。函数是一种特殊的运算。函数有函数名和参数（部分函数可没有参数）。函数有函数名和参数（部分函数可没有参数）。函数的结果有一定的数据类型。函数的结果有一定的数据类型。VB的通用函数大体上可分为的通用函数大体上可分为5类：类：算术函数算术函数 字符函数字符函数 转换函数转换函数 日期与时间函数日期与时间函数 格式化函数格式化函数34算术函数 Abs(x)求绝对值求绝对值 Abs(-10)=10 Atn(x)求反正切值求反正切值 Atn(0)=0 Cos(x)求余弦值，参数的单位是弧度求余弦值，参数的单位是弧度 Cos(0)=1 Exp(x)

27、求求ex的值的值 Exp(1)=2.71828182845905 Hex$(x)求对应的十六进制的值求对应的十六进制的值 Hex(20)=“14”Log(x)求自然对数求自然对数 Log(1)=0 Oct$(x)求对应的八进制的值求对应的八进制的值 Oct(20)=“24”Rnd(x)产生一个产生一个0，1）区间内的单精度随机数）区间内的单精度随机数 Sin(x)求正弦值，参数的单位是弧度求正弦值，参数的单位是弧度 Sin(0)=0 Sgn(x)求符号求符号 Sgn(-2)=-1 Sgn(0)=0 Sgn(2)=1 Sqr(x)求平方根求平方根 Sqr(4)=2 Tan(x)求正切值，参数的单

28、位是弧度求正切值，参数的单位是弧度 Tan(0)=035字符串函数(1)InStr(C1,C2)求字符串求字符串C2在在C1中首次出现的字中首次出现的字符位置符位置 InStr(“abcd”,“c”)=3 InStrB(C1,C2)求字符串求字符串C2在在C1中首次出现的字中首次出现的字节位置节位置 InStrB(“abcd”,“c”)=5 LCase$(C)将字符串将字符串C中的大写字母改为小写中的大写字母改为小写字母字母 LCase(“aBcD”)=“abcd”Left$(C,N)返回字符串返回字符串C左边左边N个字符个字符 Left(“abcd”,3)=“abc”Len$(C)返回字符串

29、返回字符串C的字符数的字符数 Len(“abcd”)=4 LenB$(C)返回字符串返回字符串C的字节数的字节数 LenB(“abcd”)=8 LTrim$(C)去掉字符串去掉字符串C左边的空格左边的空格 LTrim(“abcd”)=“abcd”36字符串函数(2)Mid$(C,N1,N2)求字符串求字符串C中从中从N1位置开始的位置开始的N2个字符个字符 Mid(“abcd”,2,2)=“bc”Right$(C,N)返回字符串返回字符串C右边右边N个字符个字符 Right(“abcd”,3)=“bcd”RTrim$(C)去掉字符串去掉字符串C右边的空格右边的空格 RTrim(“abcd ”)

30、=“abcd”Space$(N)返回返回N个空格个空格 Space(3)=“”String$(N,C)返回返回N个由个由C字符组成的字符串字符组成的字符串 String(3,“a”)=“aaa”String(3,“abc”)=“aaa”UCase$(C)将字符串将字符串C中的小写字母改为大写中的小写字母改为大写字母字母 UCase(“aBcD”)=“ABCD”37日期与时间函数 Date$返回系统当前的日期返回系统当前的日期 Now返回系统当前的日期和时间返回系统当前的日期和时间 Time$返回系统当前的时间返回系统当前的时间 Weekday(x,C)返回日期表达式返回日期表达式x的星期号（的

31、星期号（17）17表示星期日星期六表示星期日星期六Weekday(#3/18/2003#)=3 Weekday(#3/18/2003#,2)=2 Day(x)返回日期表达式返回日期表达式x中的日中的日Day(#3/18/2003#)=18 Month(x)返回日期表达式返回日期表达式x中的月中的月 Month(#3/18/2003#)=3 Year(x)返回日期表达式返回日期表达式x中的年中的年Year(#3/18/2003#)=200338转换函数 ASC(x)以十进制值返回字符以十进制值返回字符x的的ASCII码码Asc(“a”)=97 CBool(x)将表达式将表达式x转成逻辑值。如果表

32、达式的结果为非零转成逻辑值。如果表达式的结果为非零的值，返回的值，返回 True；否则返回；否则返回False。Cbool(10)=True CByte(x)将将0255之间的数转为字节型之间的数转为字节型CByte(97.68)=98 CCur(x)将数值型转为货币型将数值型转为货币型 CDate(x)将有效的日期字符串将有效的日期字符串x转换成为日期型。转换成为日期型。CDate(“3/18/2003”)=#3/18/2003#CDbl(x)将数值型转换成双精度型将数值型转换成双精度型 Chr$(x)返回返回ASCII码为码为x的字符的字符Chr(97)=“a”39转换函数 CInt(x)

33、将数值型数据将数值型数据x的小数部分四舍五入取整。的小数部分四舍五入取整。CInt(3.78)=4 CLng(x)将数值型转换成为长整型，小数部分四舍五入。将数值型转换成为长整型，小数部分四舍五入。CSng(x)将数值型转换成为单精度型将数值型转换成为单精度型 CStr(x)将表达式将表达式x转换为字符串转换为字符串CStr(-123)=“-123”CStr(123)=“123”CVar(x)将表达式将表达式x转换为变体型转换为变体型 Fix(x)取取x的整数部分的整数部分 Fix(-3.78)=-3 Int(x)若若x为正则取整数部分，若为正则取整数部分，若x为负则取小于等于为负则取小于等于

34、x的整的整数。数。Int(5.6)=5 Int(-5.6)=-6 Str$(x)将数值数据转换为字符串将数值数据转换为字符串 Str(-123)=“-123”Str(123)=“123”Val(x)将字符串将字符串x起始部分的数字串转成数值数据起始部分的数字串转成数值数据 Val(“123abc”)=12340格式化函数 专门用于将数值、日期和时间数据按指专门用于将数值、日期和时间数据按指定格式输出，但不会改变数据在计算机定格式输出，但不会改变数据在计算机内部的存储形式。内部的存储形式。形式：形式：Format$(,fmt$)41InputBox函数函数接收用户通过键盘输入的数据接收用户通过键

35、盘输入的数据使用格式：使用格式：V=InputBox(Prompt,Title,default,x,y,Helpfile,Context)Prompt：提示用的文字信息，如果要在提示中分行可用提示用的文字信息，如果要在提示中分行可用Chr(13)+Chr(10)或或vbCrLf。Title：对话框标题，若缺省则为工程名。对话框标题，若缺省则为工程名。Default：显示在用户编辑框中的缺省值，若缺省则为空。显示在用户编辑框中的缺省值，若缺省则为空。x,y：对话框左上角点的坐标。对话框左上角点的坐标。注意：注意：内的项目可以省略，但有时逗号不能省略。内的项目可以省略，但有时逗号不能省略。Inpu

36、tBox函数42V=InputBox(Prompt,Title,default,x,y,Helpfile,Context)InputBox函数N=InputBox(请输入你的学号：请输入你的学号：,程序示例程序示例,23001)43MsgBox函数MsgBox函数函数向用户发布提示信息，并要求用户向用户发布提示信息，并要求用户作出必要的响应。作出必要的响应。使用方法使用方法：Ans=Msgbox(Prompt,Button,Title,Helpfile,Context)Print Msgbox(Prompt,Button,Title,Helpfile,Context)Msgbox Prompt

37、,Button,Title,Helpfile,Context注意：后两种方法得不到返回值。逗号有时不能省略。注意：后两种方法得不到返回值。逗号有时不能省略。44MsgBox函数Msgbox(Prompt,Button,Title,Helpfile,Context)Prompt:提示用的文字信息。提示用的文字信息。Button:一个数值，为一个数值，为c1+c2+c3+c4，决定按钮的个，决定按钮的个数和类型。数和类型。Title:信息框标题。信息框标题。返回值：返回值：选择选择“重试重试”按钮：返回按钮：返回 4选择选择“确定确定”按钮：返回按钮：返回 1 选择选择“忽略忽略”按钮：返回按钮：

38、返回 5选择选择“取消取消”按钮：返回按钮：返回 2 选择选择“是是”按钮：返回按钮：返回 6选择选择“终止终止”按钮：返回按钮：返回 3 选择选择“否否”按钮：返回按钮：返回 745参数参数取值取值意意 义义C1按钮个数和按钮个数和名称名称0“确定确定”按钮按钮1“确定确定”按钮、按钮、“取消取消”按钮按钮2“终止终止”按钮、按钮、“重试重试”按钮、按钮、“忽略忽略”按钮按钮3“是是”按钮、按钮、“否否”按钮、按钮、“取消取消”按钮按钮4“是是”按钮、按钮、“否否”按钮按钮5“重试重试”按钮、按钮、“取消取消”按钮按钮C2图标类型图标类型16关闭信息关闭信息图标图标32警示疑问警示疑问图标图

39、标48警告信息警告信息图标图标64通知信息通知信息图标图标C3缺省按钮缺省按钮0第一个第一个按钮为缺省按钮按钮为缺省按钮256第二个第二个按钮为缺省按钮按钮为缺省按钮512第三个第三个按钮为缺省按钮按钮为缺省按钮C4运行模式运行模式0应用程序应用程序模式模式4096系统系统模式模式46MsgBox函数MsgBox(“非法数据！非法数据！”，48，“提示信息提示信息”)48=c1+c2+c3+c4 =0+48+0+047其它函数IsNumeric(x)若若x为数值型数据返回为数值型数据返回True，否则返回，否则返回False。IsNumeric(“5.6”)=True IsNumeric(“5

40、.6abc”)=False RGB(R,G,B):返回一个颜色，返回一个颜色，R、G、B取取0255之间的数。之间的数。483.5 运算符与表达式算术运算符算术运算符（乘方）（乘方）-（负号）（负号）*（乘）（乘）/（除）（除）（整除）（整除）Mod（取余）（取余）+（加）（加）-（减）（减）Mod运算中，结果与被除数同号。运算中，结果与被除数同号。字符运算符字符运算符+、&：连接：连接最好用最好用&。关系运算符关系运算符=、=、Is表达式由运算对象、运算符组成，有返回值。表达式由运算对象、运算符组成，有返回值。49 逻辑运算符逻辑运算符Not（非）、（非）、And（与）、（与）、Or（或）、

41、（或）、Xor（异或）（异或）运算符运算符结果说明结果说明Not取反，取反，True变变False、False变变TrueAnd参与运算的数均为参与运算的数均为True，结果为，结果为TrueOr参与运算的数均为参与运算的数均为Fasle，结果，结果为为False Xor参与运算的数相同则为参与运算的数相同则为False，不同则为，不同则为True 50一个表达式可能含有多种运算，一般的运算顺序如一个表达式可能含有多种运算，一般的运算顺序如下：下：函数运算函数运算；算术、字符运算算术、字符运算：负号负号*/Mod+-&关系运算关系运算；逻辑运算逻辑运算：Not And Or Xor相同优先级的

42、运算符的结合性都是从左向右。相同优先级的运算符的结合性都是从左向右。改变运算顺序可使用括号。改变运算顺序可使用括号。表达式中只能使用圆括号，且可以嵌套。表达式中只能使用圆括号，且可以嵌套。运算符的优先级与结合性514.5 赋值语句执行过程：执行过程：1.首先计算等号右边表达式的值。首先计算等号右边表达式的值。2.然后将此值保存到等号左边的变量中。然后将此值保存到等号左边的变量中。var可以是变量名（如：可以是变量名（如：student）或属）或属性名性名(如如text1.text)。“=”是赋值号，不是数学中的等号。是赋值号，不是数学中的等号。变量中的值以最近一次赋值为准。变量中的值以最近一次

43、赋值为准。赋值语句的形式：赋值语句的形式：var=52T=A A=BB=T上述三条语句实现什么功能？赋值语句举例赋值语句举例A=1A=A+1B=3B=B*4A=1A=2x=“This is a book”Number%=72Label1.FontSize=8Y=(a+b)/2ABT123T为中间变量为中间变量53赋值语句举例赋值语句举例思考：如何实现三个数交换，即思考：如何实现三个数交换，即A的值给的值给B，B的值给的值给C，C的值给的值给A？ABCT1234T为中间变量为中间变量54不同数据类型数据的赋值不同数据类型数据的赋值数值类型Integer、LongSingle、DoubleByte

44、逻辑型Boolean字符串型String非非O值转换为值转换为TrueO值转换为值转换为FalseTrue转换为负转换为负1False 值转换为值转换为O可可能能出出错错转换转换为字为字符串符串形式形式True转换为字转换为字符串符串“True”False转换为字转换为字符串符串“False”首先转换为首先转换为数值类型，数值类型，可能出错可能出错55 Dim b As Boolean,n As Integer,s As String,m As Singleb=0 将整型数据赋值给逻辑型变量将整型数据赋值给逻辑型变量b为为Falseb=2 将整型数据赋值给逻辑型变量将整型数据赋值给逻辑型变量b

45、为为Truen=b 将逻辑型数据赋值给整型变量将逻辑型数据赋值给整型变量n为为-1s=b 将逻辑型数据赋值给字符串变量将逻辑型数据赋值给字符串变量s为为“True”m=-1012.567s=m 将数值数据赋值给字符串变量将数值数据赋值给字符串变量s为为“-1012.567”n=“12”将字符串数据赋值给整型变量将字符串数据赋值给整型变量n为为12n=“12abc”将字符串数据赋值给整型变量（出错）将字符串数据赋值给整型变量（出错）n=“asds”将字符串数据赋值给整型变量（出错）将字符串数据赋值给整型变量（出错）b=“12”将字符串数据赋值给逻辑型变量将字符串数据赋值给逻辑型变量b为为True

46、b=“0”将字符串数据赋值给逻辑型变量将字符串数据赋值给逻辑型变量b为为Falseb=asds 将字符串数据赋值给逻辑型变量（出错）将字符串数据赋值给逻辑型变量（出错）56下列语句的执行结果是什么？下列语句的执行结果是什么？Dim A As IntegerDim A As IntegerA=2=3A=2=3Print APrint ADim A As IntegerDim A As IntegerA=2=2A=2=2Print APrint ADim S As StringDim S As StringDim A As IntegerDim A As IntegerS=2S=2*A2A2Print SPrint SDim A As IntegerDim A As IntegerDim B As IntegerDim B As IntegerA=B=2A=B=2Print A,BPrint A,B