第第 4 章章 VB语言基础语言基础 14.1 VB4.1 VB编程风格编程风格4.1.1VB的过程的过程VB中的过程包含两种，一种称为事件中的过程包含两种，一种称为事件过程，另一种称为通用过程。过程，另一种称为通用过程。1事件过程事件过程（系统提供的过程）（系统提供的过程）2通用过程通用过程（用户自定义的过程）（用户自定义的过程）24.1.2 VB应用程序的结构应用程序的结构1窗体模块窗体模块2标准模块标准模块3类模块类模块3窗体模块窗体模块 一个一个VBVB应用程序可根据需要有一应用程序可根据需要有一个或多个窗体。每一个窗体都有个或多个窗体。每一个窗体都有包含相关代码的窗体文件，即窗包含相关代码的窗体文件，即窗体模块。体模块。一个一个VBVB应用程序可根据需要有一应用程序可根据需要有一个或多个窗体。个或多个窗体。窗体模块的文件扩展名是窗体模块的文件扩展名是. .frmfrm4标准模块存放与窗口或控件无关标准模块存放与窗口或控件无关的代码，通常是其他模块共同使的代码，通常是其他模块共同使用的声明和过程的代码。用的声明和过程的代码。标准模块文件的扩展名是标准模块文件的扩展名是. .basbas。标准模块标准模块5类模块类模块 类模块用来定义类，并可用它类模块用来定义类，并可用它创建能被应用程序中的过程所创建能被应用程序中的过程所调用的对象。调用的对象。64.1.3 代码窗口代码窗口过程列表过程列表过程列表过程列表对象列表对象列表对象列表对象列表输入代码输入代码输入代码输入代码过程查看过程查看过程查看过程查看全模块查看全模块查看全模块查看全模块查看74.1.4 命名约定命名约定1关键字关键字2标识符标识符用来标记用户自己定义的常量、变量、控用来标记用户自己定义的常量、变量、控件、过程或函数等的名称。其命名规则如下：件、过程或函数等的名称。其命名规则如下：（1）首字符必须是字母；）首字符必须是字母；（2）长度不超过）长度不超过255个字符。用于命名控件、个字符。用于命名控件、窗体和模块的名字时长度不能超过窗体和模块的名字时长度不能超过40个字符；个字符；（3）不能与关键字同名；）不能与关键字同名；（4）作为变量名的字符串内不得包括点号和）作为变量名的字符串内不得包括点号和用于类型说明的字符用于类型说明的字符%、&、!、#、$。84.1.5 代码的书写规则代码的书写规则VB程序代码的主要的书写规则如下：程序代码的主要的书写规则如下：1续行符续行符续行符续行符“_”(一个空格后跟一个下划线一个空格后跟一个下划线)可可以将一个长语句分成多行书写，使其比较以将一个长语句分成多行书写，使其比较容易阅读和理解。例如：容易阅读和理解。例如：strTemp=天若有情天亦老，天若有情天亦老，_人间正道是沧桑。人间正道是沧桑。92一条语句写在一行上一条语句写在一行上通常一条语句写在一行上，如果要在一行通常一条语句写在一行上，如果要在一行中写多条语句，则每条语句之间必须用冒号作中写多条语句，则每条语句之间必须用冒号作为分隔符，例如：为分隔符，例如：Sum=Sum+x：Count=Count+1需要指出，从代码的易读性考虑，建议一行中需要指出，从代码的易读性考虑，建议一行中只写一条语句。只写一条语句。3使用分隔符使用分隔符在语句中，组成语句的各项（关键字、变在语句中，组成语句的各项（关键字、变量名、常量名、过程名）之间一定要有空格分量名、常量名、过程名）之间一定要有空格分隔。隔。10例如，下面的写法是错误的：例如，下面的写法是错误的：Text1.Text=Text1.Text&vbcrlf应写成：应写成：Text1.Text=Text1.Text&vbcrlf4使用英文标点符号使用英文标点符号除注释内容及字符串常量中的标点符除注释内容及字符串常量中的标点符号以外，语句中的标点符号不能使用中号以外，语句中的标点符号不能使用中文的标点符号，必须使用英文标点符号。文的标点符号，必须使用英文标点符号。114.1.6 必要的程序注释必要的程序注释1使用使用“”注释注释以注释符以注释符“”(单引号单引号)引导的注释，可放引导的注释，可放在一行语句的最后，或单独占据一行，但不能在一行语句的最后，或单独占据一行，但不能放在续行符放在续行符“_”的后面。的后面。2使用使用“Rem”注释注释关键字关键字“Rem”引导的注释，使用时必须引导的注释，使用时必须单独占据一行。如果在其它语句行后使用单独占据一行。如果在其它语句行后使用Rem，则必须用冒号，则必须用冒号“：”与前面的语句隔开。与前面的语句隔开。 124.1.7 使用缩进格式使用缩进格式nPrivate Sub Form_Click( )n x = Val(InputBox(请输入请输入x的值的值)n If x 0 Thenn Print x 0n Elsen Print x 0n End IfnEnd Sub134.2 使用适当的数据类型使用适当的数据类型4.2.1引例引例【例例4.1】分析语句分析语句Print32766+2和和Print32768+2的执行结果。的执行结果。分析：这两条语句看似简单，但运行时却分析：这两条语句看似简单，但运行时却会出现不同的情况。会出现不同的情况。Print32768+2运行结果正确。运行结果正确。Print32766+2的运行结果错误。的运行结果错误。?144.2.2 数值型数值型数据类型数据类型关键字关键字存储存储空间空间类型类型符符取取 值值 范范 围围整整型型整型整型Integer 2 Byte -32 76832 767长整型长整型Long 4 Byte-2 147 483 6482 147 483 647字节型字节型Byte 1 Byte 0255实实型型单精度型单精度型Single 4 Byte ！负数：负数：-3.402 823E38 -1.401 298E-45 正数：正数：1.401 298E-45 3.402 823E38双精度型双精度型Double 8 Byte#负数：负数：-1.797 693 134 862D308-4.940656 458 412 47D-24 正数：正数：4.940 656 458 412 47D-3241.797 693 134 862 32D308货币型货币型Currency 8 Byte -922 337 203 685 447.580 8 922 337 203 685 447.580 7151整型整型(Integer)和长整型和长整型(Long)表示形式：表示形式：n%，n为一整型数，为一整型数，%是整型数是整型数的类型符。的类型符。2字节型字节型(Byte)字节型数可以表示无符号的整数，范围为字节型数可以表示无符号的整数，范围为0255，主要用于存储二进制数。，主要用于存储二进制数。3单精度型单精度型(Single)和双精度型和双精度型(Double)n.n、n!、nEm、n.nEm4货币型货币型(Currency)例如，例如，123.45、123等。等。164.2.3 其他数据类型其他数据类型数据数据类型类型关键字关键字存储存储空间空间类型类型符符取取 值值 范范 围围日期型日期型 Date 8 01,01,10012,31,9999布尔型布尔型 Boolean 2 True与与False字符型字符型 String 字符字符串长串长 $ 065 535个字符个字符变体型变体型 Variant 根据需根据需要分配要分配 172.布尔型布尔型(Boolean) 常用于表示逻辑判断的结果，有两种常用于表示逻辑判断的结果，有两种取值：取值：True和和False3.字符型字符型(String) 字符型数据字符型数据(或称字符串或称字符串)是指用是指用“”括起来的一串字符。括起来的一串字符。 4.变体型变体型(Variant) 可以存放任何类型的数据，是一种可可以存放任何类型的数据，是一种可变的数据类型变的数据类型1.日期型日期型(Date) 184.2.4 数据类型转换数据类型转换1数值类型间的转换数值类型间的转换2数值类型与字符串类型的转换数值类型与字符串类型的转换3数值类型与逻辑类型的转换数值类型与逻辑类型的转换4字符串类型与逻辑类型的转换字符串类型与逻辑类型的转换194.3 常量与变量常量与变量常量常量( (也称常数也称常数) ): :在程序运行期间在程序运行期间其值始终保持不变的量。其值始终保持不变的量。VBVB中有两种形式的常量：中有两种形式的常量：u一般常量一般常量u符号常量符号常量204.3.1 变量变量1变量的命名变量的命名VB变量的命名见标识符的命名规则。变量的命名见标识符的命名规则。2变量的声明变量的声明语法格式如下：语法格式如下：Dim变量名变量名As数据类型数据类型，变量名，变量名As数数据类型据类型213变量的隐式声明变量的隐式声明强制声明语句强制声明语句OptionExplicit4变量的作用域变量的作用域名称名称作用域作用域声明位置声明位置使用语句使用语句局部变量局部变量过程过程过程中过程中Dim或或Static模块级模块级变量变量窗体模块及窗体模块及标准模块标准模块模块的声明模块的声明部分部分Dim或或Private全局变量全局变量整个应整个应用程序用程序标准模块的标准模块的声明部分声明部分Public224.3.2 常量常量1直接常量直接常量例如：例如：数值常量：数值常量：24，-87.31，12E7字符串常量：字符串常量：VisualBasic逻辑型常量：逻辑型常量：True，False日期常量：日期常量：#06112005#在在VB中还允许使用八进制常量和十六进制常量。中还允许使用八进制常量和十六进制常量。八进制常量：数值前加八进制常量：数值前加&O。例如，。例如，&012、&0253。十六进制常量：数值前加十六进制常量：数值前加&H。例如，。例如，&H4E，&H3F2D232用户声明的符号常量用户声明的符号常量用户声明的符号常量是用用户声明的符号常量是用Const语句定义的，语句定义的，这类常量必须先声明后使用。这类常量必须先声明后使用。Const语句的语句的语法格式如下：语法格式如下：Public|PrivateConst常量名常量名As数据类数据类型型=表达式表达式功能：将表达式表示的数值赋给指定的符功能：将表达式表示的数值赋给指定的符号常量。号常量。24注意：注意：使用使用Public声明符号常量时，声明语句只能声明符号常量时，声明语句只能出现在标准模块中。出现在标准模块中。若在窗体通用声明处或若在窗体通用声明处或在过程中使用在过程中使用Public声明符号常量是错误的。声明符号常量是错误的。使用使用Private声明符号常量时，声明语句可以声明符号常量时，声明语句可以出现在窗体模块或标准模块中。出现在窗体模块或标准模块中。若在过程中若在过程中使用使用Private声明符号常量是错误的声明符号常量是错误的。格式的表达式中不能出现函数格式的表达式中不能出现函数。例如，下面。例如，下面在模块通用声明处声明的符号常量是错误的：在模块通用声明处声明的符号常量是错误的：PrivateConstxasInteger=Cint(2.56)253系统提供的常量系统提供的常量系统提供的常量，也称内部常量，或系统常系统提供的常量，也称内部常量，或系统常量。例如系统定义的颜色常量量。例如系统定义的颜色常量vbBlack(代表黑色代表黑色)，vbRed(代表红色代表红色)，vbcrlf代表回车换行等。代表回车换行等。这些常量可以在代码中直接使用。这些常量可以在代码中直接使用。264.4 运算符与表达式运算符与表达式nVB中的运算符中的运算符算术运算符算术运算符（ , ,-，*，/，MOD ，+ ，-）关系运算符关系运算符（, ,=, ,=, ,=, ,）逻辑运算符逻辑运算符（ NOT， AND，OR，XOR）字符串运算符字符串运算符（+，&）274.4.1 算术运算符算术运算符n算术运算符算术运算符设设a=3a=3运算符名称优先级例结果乘方1a29-取负2-a-3*乘3a*a9/除310/a3.333整除410a3Mod取余510 mod a1+加610+a13-减610 - a728n例：例： 5+10 mod 10 9 / 3 +2 2 结果：?5+10 mod 10 9 / 3 +2 25+10 mod 10 9 / 3 + 45+10 mod 10 3 + 45+10 mod 3 + 45 + 1 + 41029（）（）函数函数负号号*,/MOD+,-( 5+ 10 ) mod 10 9 / 3 + 2 sin(2)算术运算符的运算次序为：算术运算符的运算次序为：30说明：说明：(1)VB中的四舍五入是按中的四舍五入是按“奇进偶不进奇进偶不进”原则进原则进行的，行的，即当小数点前为奇数时，小数点后的数即当小数点前为奇数时，小数点后的数按四舍五入方式进行；当小数点前为偶数时，按四舍五入方式进行；当小数点前为偶数时，小数点后的数小于等于五时舍去，大于五时进小数点后的数小于等于五时舍去，大于五时进入。例如：入。例如：3.5四舍五入的结果为四舍五入的结果为4，4.5四舍五四舍五入的结果为入的结果为4，而，而4.51四舍五入的结果为四舍五入的结果为5。(2)乘方运算乘方运算ab，若，若a为负数则为负数则b必须是整数，必须是整数，例如例如(-8)(13)是错误的。乘方运算的结果是是错误的。乘方运算的结果是Double型。型。31（3）除法运算除法运算ab，无论，无论a、b是整型还是实型，是整型还是实型，VB都将都将a、b转换为转换为Double型数据再进行运算，型数据再进行运算，其结果是其结果是Double型。型。（4）整除运算）整除运算ab，a、b一般为整数，若一般为整数，若a或或b带有小数点时，带有小数点时，VB首先将其四舍五入为整数首先将其四舍五入为整数(注注意，这里的四舍五入按意，这里的四舍五入按“奇进偶不进奇进偶不进”的原则进的原则进行行)。例如：例如：3.52=2，而，而4.512=2。)，然后进，然后进行整除运算。运算结果简单地截取整数部分，小行整除运算。运算结果简单地截取整数部分，小数部分不作四舍五入处理。数部分不作四舍五入处理。如果如果a、b都是都是Integer型，运算结果是型，运算结果是Integer型，否则运算结型，否则运算结果为果为Long型。型。32（5）求余运算）求余运算aModb，a、b一般为整数，一般为整数，若若a或或b带有小数点时，带有小数点时，VB首先对其四舍五入首先对其四舍五入(按照按照“奇进偶不进奇进偶不进”原则处理原则处理)。aModb的的符号由符号由a的符号确定的符号确定，当，当a为正数时为正数时aModb为正数；当为正数；当a为负数时，为负数时，aModb为负数。为负数。例如：例如：-13Mod6=-1，而，而13Mod6=1。如如果果a、b都是都是Integer型，运算结果是型，运算结果是Integer型，否则运算结果为型，否则运算结果为Long型。型。（6）参加算术运算的操作数都应是数值型，）参加算术运算的操作数都应是数值型，若是字符型或逻辑型，则系统自动将其转换若是字符型或逻辑型，则系统自动将其转换成数值型后再运算。成数值型后再运算。334.4.2 字符串运算符字符串运算符字符串运算符有两个：字符串运算符有两个：&和和+。它。它们的作用都是将两个字符串拼接起来。们的作用都是将两个字符串拼接起来。注意：注意：(1)算术运算符与连接运算符同时存在时，算术运算符与连接运算符同时存在时，先进行算术运算再进行连接运算。先进行算术运算再进行连接运算。(2)&运算符的两边与操作数之间要留至运算符的两边与操作数之间要留至少一个空格，这是为了与长整型的类型符少一个空格，这是为了与长整型的类型符加以区别。加以区别。34例例: Visual Visual & & Basic Basic VisualBasic 123 & 456 123 + 456 579 Basic & 456 Basic + 456 出错 Visual Visual + + Basic Basic VisualBasic 123456 Basic456 35“+”连接符两旁的操作数：均为数值型：算术加一个为数字字符型，另一个为数值型：算术加（将数字字符型转换为数值型）一个为非数字字符型，另一个为数值型：出错364.4.3 关系运算符关系运算符n对两个数据进行比较，结果为逻辑对两个数据进行比较，结果为逻辑值值true或或false;n常用的运算符有：常用的运算符有：大于大于,=等于等于=大于等于大于等于,不等于不等于37说明：说明：(1)关系运算符的优先级相同且低于字符串连接关系运算符的优先级相同且低于字符串连接符。符。(2)关系运算符一般用于两个数据类型相同的表关系运算符一般用于两个数据类型相同的表达式之间的比较。如果比较的两个表达式数据类达式之间的比较。如果比较的两个表达式数据类型不相同，则自动转换成相同的数据类型后再比型不相同，则自动转换成相同的数据类型后再比较，转换不成功则出错。较，转换不成功则出错。例如，例如，23=VB将产生类型不匹配错误。将产生类型不匹配错误。(3)字符型数据的关系运算依照字符的字符型数据的关系运算依照字符的ASCII码，码，自左至右按照自左至右按照“逐个比较，遇大则大，长大短小，逐个比较，遇大则大，长大短小，完全相同，才是相等完全相同，才是相等”的原则进行。的原则进行。38例例:(23+12)=100False(23trueTruevcvbFalse abc vbTrue#12/15/2005#12 ) And False运算结果为运算结果为falsen(23 = 12 ) Or 3 0 运算结果为运算结果为truen78.9/32.77 - 4.98 运算结果为运算结果为false44【例例4.7】表达式的错误使用。表达式的错误使用。数学表达式数学表达式0x10，如果在，如果在VB中将其写成：中将其写成：0=x10，程序运算不会产生语法错误，但无论，程序运算不会产生语法错误，但无论x取值如何，表达式的值永远为取值如何，表达式的值永远为True，从而给程，从而给程序带来难以查找的错误。序带来难以查找的错误。原因是，原因是，VB在执行该表达式时，首先根据在执行该表达式时，首先根据x的值计算的值计算00Andx b+d OR cd AND ABS(c) =a OR NOT c d+5 7 11 OR cd AND 2 =a OR NOT c13 假假 OR 假假 AND 假假 OR NOT 假假 假假 OR 假假 OR 真真真真多种运算混合多种运算混合:484. .5 常用内部函数常用内部函数 nVBVB在系统内部提供了若干个能完成某在系统内部提供了若干个能完成某个特定功能的程序段，称为个特定功能的程序段，称为内部函数内部函数。n函数调用的一般格式为：函数调用的一般格式为： 函数名函数名( (参数参数1 1，参数，参数2 2，)n函函数数调调用用后后，一一般般都都有有一一个个确确定定的的函函数值，即数值，即返回值返回值。49常见函数常见函数1.数学函数数学函数2.字符串函数字符串函数3.日期与时间函数日期与时间函数4.转换函数转换函数5.格式输出函数格式输出函数504.5.14.5.1 数学函数数学函数需要掌握：需要掌握：Abs,Exp,Fix,Int,Log,Rnd,Sqr,Sgn说明：说明：(1)三角函数的自变量单位是弧度，如三角函数的自变量单位是弧度，如sin32应写成应写成Sin(32*3.14159180)。(2)Log函数是求自变量的自然对数值。若要求任意底数函数是求自变量的自然对数值。若要求任意底数n数值数值x的常的常用对数值，即求用对数值，即求的值，需要使用公式：的值，需要使用公式：Log(x)/Log(n)。(3)Log和和Exp互为反函数，即互为反函数，即Log(Exp(x)、Exp(Log(x)的结果还的结果还是原来自变量是原来自变量x的值。的值。51(4)函数函数Int是求小于或等于自变量是求小于或等于自变量x的最大整的最大整数。数。Fix是求自变量是求自变量x的整数。的整数。Int和和Fix的区别的区别是，若是，若x0，则，则Int得到的是小于或等于得到的是小于或等于x的第的第一个负整数，而一个负整数，而Fix则得到大于或等于则得到大于或等于x的第一的第一个负整数；若个负整数；若x0，则两者的值相同。，则两者的值相同。例如，例如，Int(-6.53)=-7，Fix(-6.53)=-6。利用利用Int函数可以对数据进行四舍五入处理。函数可以对数据进行四舍五入处理。例如，对一个正数例如，对一个正数x舍去小数位时进行四舍五舍去小数位时进行四舍五入，可采用如下式子：入，可采用如下式子：Int(x+0.5)当当x=7.4时，时，Int(7.4+0.5)=7当当x=7.5时，时，Int(7.5+0.5)=852n需要掌握：需要掌握：InStr,LCase,Len,Left,Mid,Right,UCasenMid(ABCDEFG,2,3）结果结果:BCDnLen(VB程序设计程序设计)结果结果:6nInStr(2,ABCDEFG,EF)结果结果:5nInstr(3,A12a34A56,A,1)结果结果:4nLcase(Abab)结果结果:“abab4.5.2 4.5.2 字符串函数字符串函数 53说明：说明：(1)函数函数Instr中的中的f是每次搜索的起点；是每次搜索的起点；k为可选为可选参数，表示比较方式。若参数，表示比较方式。若k为为0(默认默认)，表示区分，表示区分大小写；若大小写；若k为为1，则不区分大小写。，则不区分大小写。例如，例如，Instr(3，A12a34A56，A)的结果为的结果为7。而。而Instr(3，A12a34A56，A，1)的结果的结果为为4。(2)在函数在函数Mid中，若省略中，若省略n，则得到的是从，则得到的是从m开开始的往后所有字符，如始的往后所有字符，如Mid(ABCDE,2)的结果的结果为为BCDE。54在字符串处理中，经常使用如下格式的在字符串处理中，经常使用如下格式的Mid语句：语句：Mid(字符串，字符串，m，n)=子字符串子字符串该语句用该语句用“子字符串子字符串”替换替换“字符串字符串”中从中从m开始的与开始的与“子字符串子字符串”等长的一等长的一串字符。若使用参数串字符。若使用参数n，则用，则用“子字符串子字符串”左起左起n个字符来替换个字符来替换“字符串字符串”中从中从m开始开始的的n个字符。个字符。例如，假设例如，假设S=ABCDE，执行语句，执行语句Mid(S，3)=99后，后，s的值为的值为AB99E。554.5.34.5.3 日期与时间函数日期与时间函数n日期时间函数用于进行日期和时间处日期时间函数用于进行日期和时间处理。理。n表表4-7列出了常用的日期时间函数。列出了常用的日期时间函数。n一般掌握。一般掌握。564.5.44.5.4 转换函数转换函数nAsc(Asc( B B ) ) 结果：结果：6666nChr(66) Chr(66) 结果：结果： B B nVal(Val( A34A34 ) ) 结果：结果：0 0nVal(Val( 34A1234A12 ) ) 结果：结果：3434nVal(Val( 1.2e31.2e3 ) ) 结果：结果：12001200 nAsc(Chr(65) Asc(Chr(65) 结果：结果：6565nChr(Asc(Chr(Asc(A) A) 结果：结果： AA 57说明：说明：(1)Asc(x)与与Chr(x)函数互为反函数，即函数互为反函数，即Chr(Asc(x)、Asc(Chr(x)的值为原来各自变量的值为原来各自变量的值。的值。(2)CInt的四舍五入是按的四舍五入是按“奇进偶不进奇进偶不进”的原则的原则进行，进行，即当小数点前为奇数时，小数点后的数按即当小数点前为奇数时，小数点后的数按四舍五入方式进行；当小数点前为偶数时，小数四舍五入方式进行；当小数点前为偶数时，小数点后的数小于等于五时舍去，大于五时进入。点后的数小于等于五时舍去，大于五时进入。例如：例如：3.5四舍五入的结果为四舍五入的结果为4，4.5四舍五入的结四舍五入的结果为果为4，而，而4.51四舍五入的结果为四舍五入的结果为5。58注意注意CStr函数与函数与Str函数的区别：函数的区别：格式：格式：CStr(x)作用：将数值作用：将数值x转换为字符，不保留转换为字符，不保留符号位符号位示例：示例：x=328CStr(x)的结果为的结果为“328”，长度为，长度为3Str(x)的结果为的结果为“328”，长度为，长度为4594.5.54.5.5 随机函数随机函数随机函数随机函数Rnd的使用格式如下：的使用格式如下：Rnd(x)随随X取值不同，函数值有如下几种情况：取值不同，函数值有如下几种情况：(1)当当x0时，则产生随机序列中的下一个随时，则产生随机序列中的下一个随机数；机数；(3)当当x=0时，则产生最近生成的随机数；时，则产生最近生成的随机数；(4)当省略当省略x时，则产生随机序列中的下一个随时，则产生随机序列中的下一个随机数。机数。60说明：说明：(1)Rnd函数产生函数产生0，1)的随机数。的随机数。(2)Rnd函数经常与函数经常与Randomize语句配合使用语句配合使用得到不同的随机数。得到不同的随机数。Randomize语句的格式如下：语句的格式如下：Randomize(3)Rnd函数通常与函数通常与Int函数配合使用。要生成函数配合使用。要生成下界，上界下界，上界范围内的随机整数，可以使用公式：范围内的随机整数，可以使用公式：Int(Int(上界上界- -下界下界+1) * Rnd+1) * Rnd+下界下界) )614.5.64.5.6 格式输出函数格式输出函数 1Spc函数函数格式：格式：Spc(n)功能：在输出项之间输出功能：在输出项之间输出n个空格。个空格。2Tab函数函数格式：格式：Tab(n)功能：指定输出项在输出行的位置。功能：指定输出项在输出行的位置。623.Format函数函数格式：格式：Format(表达式，格式符表达式，格式符)功能：功能：根据指定的格式输出表达式的值。根据指定的格式输出表达式的值。631.数值格式符数值格式符格格 式式 符符功功 能能#占位符，显示一位数字。不足位不用占位符，显示一位数字。不足位不用0补足补足0占位符，不足位用占位符，不足位用0补足补足占位符，显示一位数字。不足位不用占位符，显示一位数字。不足位不用0补足补足.显示小数点显示小数点%以百分比形式输出，且出现以百分比形式输出，且出现%符号符号,显示千位分隔符显示千位分隔符E+，E- 以指数格式输出以指数格式输出+，-，$ 正、负号及美元符号原样输出正、负号及美元符号原样输出号后的内容原样输出号后的内容原样输出64例：有程序代码如下：例：有程序代码如下：PrivateSubForm_Click()x = 12345.678x = 12345.678 Print Format(x, #.#) Print Format(x, #.#) Print Format(x, 0000000.0000) Print Format(x, 0000000.0000) Print Format(x, #%) Print Format(x, #%) Print Format(x, +#,#.#$) Print Format(x, +#,#.#$) Print Format(x, #.#E+) Print Format(x, #.#E+) Print Format(x, #.# Print Format(x, #.#美金美金)EndSub(结果结果)652.日期和时间格式符日期和时间格式符格格 式式 符符功功 能能d显示日期（显示日期（131），个位前不加），个位前不加0ddd/dddd显示星期缩写（显示星期缩写（SunSat）或全名（）或全名（SundaySaturday）dddddd显示完整长日期（显示完整长日期（yyyy年年m月月d日）日）m显示月份（显示月份（112），个位前不加），个位前不加0mmm/mmmm显示月份缩写（显示月份缩写（JanDec）或全名（）或全名（JanuaryDecember）y/yyy显示一年中的天（显示一年中的天（1366）或四位数的年份（）或四位数的年份（01009999）h显示小时（显示小时（023），个位前不加），个位前不加0m在在h后显示分（后显示分（059），个位前不加），个位前不加0s显示秒（显示秒（059），个位前不加），个位前不加0hh:mm:ss显示完整时间（小时、分和秒）显示完整时间（小时、分和秒）66【例例4.10】日期格式符使用示例。日期格式符使用示例。程序代码如下：程序代码如下：PrivateSubForm_Click()t=NowPrintFormat(t,今天是：今天是：&dddddd&hh:mm:ss)EndSub程序运行结果如下图所示。程序运行结果如下图所示。673. 字符串格式符字符串格式符格格 式式 符符功功 能能强迫以大写输出强迫以大写输出输出的字符数小于格式符规定的位数时，输出的字符数小于格式符规定的位数时，字符前加空格字符前加空格&输出的字符数小于格式符规定的位数时，输出的字符数小于格式符规定的位数时，字符前不加空格字符前不加空格684. .6. .1 InputBox函数函数 其格式为：其格式为：Var=InputBox(prompt，title，default，xpos，ypos)功能：功能：InputBox函数产生一个包含提示信函数产生一个包含提示信息的对话框息的对话框( (简称输入框简称输入框) )，提示用户输入，提示用户输入信息，并返回用户在输入框所输入的字符信息，并返回用户在输入框所输入的字符串。串。46 数据输入输出数据输入输出69例如例如: msg1$=请输入客户的姓名：请输入客户的姓名：msg2$=输入后按回车键输入后按回车键msg3$=或单击或单击“确定确定”按钮按钮guest=InputBox(msg1$+Chr(13)+msg2$+Chr(10)+msg3$,输入客户姓名输入客户姓名,张玉生张玉生) 704.6.2 MsgBox函数与函数与MsgBox语句语句MsgBox函数产生一个对话框来显示函数产生一个对话框来显示消息（简称消息框），等待用户单击消息（简称消息框），等待用户单击按钮，并返回一个按钮，并返回一个Integer型数据以表型数据以表明用户单击了哪一个按钮。明用户单击了哪一个按钮。71语法格式语法格式: 作为函数使用：作为函数使用：变变量量=MsgBox(prompt,button,title)作为语句使用：作为语句使用：MsgBoxprompt, ,button, ,title72本章小结本章小结 VB的编程风格：应用程序的结构、代码窗口的编程风格：应用程序的结构、代码窗口和代码的书写规则。和代码的书写规则。 VB的数据类型的数据类型：数据类型表示方式、数据类数据类型表示方式、数据类型的转换型的转换。 变量与常量：变量的声明、有效范围，常量变量与常量：变量的声明、有效范围，常量的表示方式。的表示方式。 运算符与表达式：运算符的种类、优先级，运算符与表达式：运算符的种类、优先级，表达式的运算规则。表达式的运算规则。 VB的内部函数：常用内部函数的熟练运用。的内部函数：常用内部函数的熟练运用。7374