教学材料《ＶＢ导论》-4.1

本章内容4.1VB程序代码的组织方式4.2代码行的书写规则4.3VB的数据4.4运算符与表达式4.5赋值语句4.6VB的公共函数4.7Inputbox函数与Msgbox函数4.1VB程序代码的组织方式4.1.1过程4.1.2模块4.1VB程序代码的组织方式一个VB程序由两部分组成：窗体界面设计程序代码设计这两部分的关系：程序代码的设计为了将窗体界面上的控件联系在一起。过程：具有特定书写格式，包含若干可被作为一个整体执行的代码行的一个代码组。过程

根据执行的方式,过程可分为事件过程和通用过程.事件过程：用来响应由用户或系统引发的各种事件的代码行。通用过程：可被共享的代码。模块：窗体模块，标准模块，类模块窗体模块：每个窗体都对应一个窗体模块。包括：窗体的事件过程窗体和控件的属性及说明仅供本窗体中的过程共享的通用过程存储在窗体文件frm中标准模块：可被多个窗体共享的代码保存的过程都是通用过程存储在bas文件中不限于一个应用程序，还可供其它应用程序重复使用。类模块4.2VB程序的书写规则语句是构成VB程序的最基本成分一句一行一行多句，行间加“：”一句多行在行尾加续行标志“

_”（空格加下划线）。不区分大小写，保留字第一个字母自动变为大写注释的方法：Rem或‘（半角，英文状态下）4.3数据类型数据是程序处理的对象不同类型的数据表示不同的对象=①数值数据类型：包括整型、长整型、单精度浮点型、双精度浮点型和货币型②字符数据类型：包括定长字符串和不定长字符③其它数据类型：包括字节型、布尔型、日期型和对象类型④变体数据类型4.3.1数据类型表4-1VB支持的数据类型主要分为：要合理定义数据类型注意：1.VB中对没有声明的变量其缺省的数据类型是变体型，可以用来存储各种数据，但所占用的内存比其它类型都多（>=16byte）。2.为提高运行效率(整型效率较高)，或达到一定的运算精确度（浮点型精度较高，但运行较慢），应合理的定义数据类型。

4.3.2常量

在程序运行过程中，其值始终不改变的量称为常量。在VB中有3类常量：普通常量符号常量系统常量一、普通常量

1．

整型常量

（1）整型（Integer）：表示-32768至32767之间的整数例如：1011020

（2）长整型（Long）：表示-2,147,483,648至2,147,483,647之间的整数例如：长整型常数的书写：23&

整型常数的3种形式：

1）十进制整数。如125，0，-89。202）八进制整数。以&或&O（字母O）开头的整数是八进制整数，如&O25表示八进制整数25，等于十进制数21。3）十六进制。以&H开头的整数是十六进制整数，如&H25表示十六进制整数25。2、实数1）单精度实型（Single）：有效数为7位2）双精度实型（Double）：有效数为15位实数常量的表示：1）十进制小数形式：它是由正负号（+，-）、数字（0-9）和小数点（.）或类型符号（！、#）组成，例：0.123、123！、123#等2）指数形式：例：1.25E+3和1.25D+3相当于1250.0或者1.25×103。3、字符串常量字符串常量是用双引号""括起的一串字符，可以是所有西文字符和汉字、标点符号等；例如："ABC"，"abcdefg"，"123"，"0"，"VB程序设计"等。注意：（1）""表示空字符串，而""表示有一个空格的字符串；4、逻辑（Boolean）数据类型只有两个值True，或False。5、日期常量日期（Date）型常量用＃括起来。例：#09/02/99#、

#January4,1989#，

#2002-5-414:30:00PM#二、符号常量用符号表示的常量。符号常量的使用提高了程序的可读性。符号常量的声明格式：

[public|private]Const常量名

[As类型]=数值

或：[public|private]Const常量名

[类型符号]=数值例如：

ConstPIAsDouble=3.1415926535等价于：

ConstPI#=3.1415926535Const

MAXAsInteger=&O144

’声明了常量MAX，代表八进制数144，整型

★注意事项：1.Public选项只能用在标准模块中，用以说明可在整个应用程序中使用的常量；private选项则可用于在窗体模块范围内使用的常量。2.只有省略Public

和private

的Const

语句才能出现在过程中。

使用const语句定义的常量名命名规则是：

1、不超过255个字符;2、只能由字母、数字和下划线组成并且首字符必须是字母的字符串;3、常量中字母不区分大小写。符号常量的应用实例Text1.ForeColor=vbRed

这里的vbRed就是系统常量。三、系统常量

视图—对象浏览器--VBA4.3.3变量

变量是指在程序运行过程中其值可以改变的量。在程序的运行过程中，变量用来临时存储程序中的数据。一个变量必须有一个唯一的变量名和相应的数据类型。通过变量名来引用一个变量，数据类型则决定了该变量的存储方式和在内存中占据存储单元的大小。1.变量名的命名规则只能由字母、数字和下划线组成，首字符必须是字母长度不超过255个字符在作用域内必须唯一不得包括点号和用于类型说明的字符：%&！＃＠＄不得使用系统保留字区别作用范围作用范围定义方法定义位置局部变量当前过程Dim|Static在过程内窗体/模块变量当前窗体或模块中的所有过程Private|Dim在窗体或模块的声明部分全局变量工程内的所有过程Public在窗体或模块的声明部分例2.变量的作用域与变量说明语句2.变量的作用域与变量说明语句变量的定义语句格式为：Dim

<变量名1>

[As<类型1>][,<变量名2[As<类型2>]]……PrivatePublicStatic例如: DimabAsinteger,sumAssingle

或Dimab%,sum!

注意：定义一个变量后，如果用户不给赋值，系统会自动为该变量赋予一个初始值数值型：0

字符串：空串（””）逻辑性：False类型问题

在变量的类型说明语句中，必须对每个需要说明的变量逐个使用AsType说明其类型DimxAsinteger

如果未说明，则按变体型处理

Dima,bAsInteger表4-4字符串问题

字符串的类型为string，既可是定长，也可是变长，如何区分？缺省为变长也可以设置为定长

Dim<变量名>AsString*size（例6）注意：定长字符串变量在标准模块中可以说明为：Public或Private；在窗体和类模块中，必须将变量说明为Private.例如：在窗体的通用声明部分写成：Publicstr1asstring*10是错误的。强制变量声明语句OptionExplicit语句作用：强制显式声明变量。即使用任何一个变量必须“先声明,后使用”4.4运算符和表达式运算符表达式VB中的运算符和表达式可分为：算术运算符与算术表达式、关系运算符与关系表达式、逻辑运算符与逻辑表达式1.算术运算符包括：^(乘方)、-(负号)、/*、\(整除)MOD、+-，+、&表达式:(-5)^2+5Mod3举例

25^0.5=5-4=-44*5=204/5=0.84\5=05mod4=12+3=54.5-2.4=2.1说明:

（1）指数运算不但可以用来计算乘方，还可以计算方根，如：5^2=25,25^0.5=5(2)整除运算（\）的结果是商的整数部分。例如：7\2=3。如果参与整除运算的是浮点数，则先按四舍五入原则将它们变成整数，然后相除取商的整数部分。例如：4.8\2=5\2=2.

注意：\后得到的结果为整型。

(3)mod是求两个整数相除后的余数。如果参与运算的两个量是整数，则直接运算。如果参与运算的是浮点数，则先按四舍五入原则将它们变成整数，然后取余。例：12.33mod4.75=12mod5=2注意：mod后得到的结果为整型。(4)字符串运算符有两个：”&”,”+”.它们都是将两个字符串拼接起来。当连接符两旁的操作量都为字符串时，上述两个连接符等价。它们区别是：

+：连接符两旁的操作数应均为字符型；若其中一个为数值字符型，如“123”、“78”，另一个为数值型，则自动将数值字符型转换成数值型，然后进行算术加法运算；若其中一个为非数值字符型，如“abc”,”DEF”等，另一个为数值型，则出错。

&：连接符两旁的操作数既可为字符型也可为数值,不管是字符型还是数值型，进行连接操作前，系统先将操作数转换成字符型，然后再连接。课堂练习：

“VB”+”语言基础”=“100”+120=“100”+”120”=“ABC”+123=“”thisisa”&”dog”=“100”&120=100&120=“abc”&”123”=“abc”&123=

VB语言基础220“100120”出错“thisisa

dog”“100120”“100120”“abc123”“abc123”2、算术运算的优先级运算运算符指数^取负-乘法*浮点除法/整数除法\取余mod加法+减法-连接&例：5+2*10mod10\9/3+2^2结果是：11课堂练习表达式:6.5*5Mod28\8=?VB中的秘密……dimaasinteger,basinteger,casinteger,dasintegera=6.5b=5.5c=5.51d=5.49PrintaPrintbPrintcPrintdVB中.5的问题，朝着向它最近的偶数变化3.VB算术表达式书写规则（书写中需注意的问题！！）(1)运算符不能相邻。例a+*b是错误的；(2)乘号不能省略,括号必须成对出现；(3)一个表达式在同一行上书写，没有高低、大小区分；(4)不能出现非法的字符；(5)要注意各种运算符的优先级别，为保持运算顺序，在写VB表达式时需要适当添加括号（）,若用到库函数必须按库函要求书写；

例(1)b2-4ac,写成VB表达式为:b*b-4*a*c(b-sqr(b*b-4*a*c))/(2*a)(a+b)/(a-b)课堂练习

已知数学表达式(x+1)/(xy)3,写出它的VB表达式.Answer:(x+1)/(x*y)^32关系运算符与关系表达式运算符含义优先级实例结果<小于15+10<20False<=小于或等于10<=20True>大于10>20False>=大于或等于"This">="That"True=等于"This"="That"False<>不等于"This"<>"That"True

比较两个运算量之间的关系，关系表达式的运算结果为逻辑量。若关系成立，结果为True，若关系不成立，结果为False。

VB中的关系运算符如下表所示。比较时注意以下规则：(1)如果两个操作数都是数值型，则按其大小比较．如20>100,结果为false.(2)数值型与可转换成数值型的数据比较,如:200>”100”,按数值比较,结果为True.(3)数值型与不能转换成数值型的数据比较,如54>”abc”,不能比较,系统出错.（4）字符串比较,则按字符的ASCII码值从左到右一一比较,直到出现不同的字符为止。例："ABCDE">"ABRA"结果为False

课堂练习

如:“aBcd”>”abc”结果为“bc”>”abd”结果为.“abc”>”abd”结果为falsetruefalse(5)汉字字符>西文字符.例“abc”>”中国”,结果为false.3.逻辑运算符包括：Not、And、Or、Xor.AND:逻辑与,两边的值均为真时,结果为真；否则为假OR:逻辑或,两边的值至少有一个真,结果为真；否则为假NOT:逻辑反.只有一个参数XOR:逻辑异或,两边的值不同时,结果为真；否则为假

ABNotAAAndBAOrBAXorB

TTFTTFTFFFTTFTTFTTFFTFFF说明：数学上表示某个数在某个区域时用表达式：10≤X<20

在VB程序中应写成：X>=10AndX<20

如果写成如下形式将是错误的：

10<=x<20或

10<=xOrx<20

例：写出逻辑表达式：选拔优秀生的条件：三门功课英语(C1)、数学(C2)、计算机(C3),总分至少265分，或C2、C3分别大于90分且C1不低于80分。C1+C2+C3>=265OR(C1>＝80andC2>90andC3>90)

写成下列VB表达式：用人单位招聘秘书：年龄小于40岁，女性，学历专科或本科：

年龄<=39性别=“女”学历=“专科”学历=“本科”课堂练习AndOrAnd(）注意:参与逻辑运算的一般都是逻辑型数据,Not(6>2)=(6>2)or(6<2)=falsetrue思考:??9and5=??

如果参与运算的两个操作数都是数值量,则以数值的二进制值逐位进行逻辑运算.例:9and5

将1001and0101=0001=1逻辑运算的优先次序如下:not->and->or->xor4、日期型表达式日期型数据是一种特殊的数值型数据，只能有下面3种情况：1．一个日期型数据可以相减：

DateB-DateA结果是一个数值型整数(两个日期相差的天数)。例如：#05/08/2002#-#05/01/2002#其结果为数值：72．一个日期型数据（DateA）与一数值数据（N）可作加法运算：DateA+N其结果仍是一个日期型数据。3.一个日期型数据（DateA）与一数值数据（N）可作减法运算：

DateA-N其结果仍是一个日期型数据。例如：#05/08/2002#-75、运算符的执行顺序

表达式中出现了多种不同类型的运算符时，其运算符优先级如下：

算术运算符>=字符运算符>关系运算符>逻辑运算

说明：

1．当一个表达式中出现多种运算符时，首先进行算术运算符，接着处理字符串连接运算符，然后处理比较运算符，最后处理逻辑运算符.2．可以用括号改变优先顺序，强令表达式的某些部分优先运行。括号内的运算总是优先于括号外的运算。对于多重括号，总是由内到外。思考:B=(30-15>4+7and5*4=20)=???分析：出现了算术运算：*，+，-；关系运算：>,=;逻辑运算:and.

先进行30-15,4+7和5*4,分别得15、11和20；再对这些结果进行关系运算15>11,20=20,其结果都是True,再进行逻辑运算.TrueandTrue,B=True6.同一表达式中的数据的类型转换(了解)

在算术运算中，如果操作数的数据精度不同，VB规定运算结果采用精度较高的数据类型。比如:整