vb第3章 语言基础.ppt

《vb第3章 语言基础.ppt》由会员分享，可在线阅读，更多相关《vb第3章 语言基础.ppt（56页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、第三章第三章 VB语言基础语言基础12/29/20221本章的目标：本章的目标：l掌握编码基本规则l掌握标准数据类型和自定义数据类型l掌握变量和常量的含义及声明方法l掌握常见内部函数及其用法l掌握运算符和表达式的书写及应用l掌握基本语句12/29/202223.1 VB编码基本规则编码基本规则 1.注释语句规则注释语句规则 注释所起的作用是让某些语句不参与系统程序的编译。注释所起的作用是让某些语句不参与系统程序的编译。在在VB中，注释语句有两种方式：中，注释语句有两种方式：1）用）用“Rem”关键字做开头；关键字做开头；2）用）用“”号开头。号开头。2.编码字符大小写不区分编码字符大小写不区分

2、 在进行在进行VB编码时，所用英文字符大小写不区分，在运行过程中系编码时，所用英文字符大小写不区分，在运行过程中系统自动给以转换，其转换规则如下：统自动给以转换，其转换规则如下：（1）VB中的关键字，首字母被转换为大写，其余字母被转换为小写，中的关键字，首字母被转换为大写，其余字母被转换为小写，且代码颜色一般为蓝色。且代码颜色一般为蓝色。（2）用户自定义的变量、过程名，）用户自定义的变量、过程名，VB以第一次定义为准，以后输入的以第一次定义为准，以后输入的自动向首次定义的转换。自动向首次定义的转换。12/29/202233.一行上可以书写多行语句一行上可以书写多行语句 将多行语句书写在同一行上

3、，多行语句之间用将多行语句书写在同一行上，多行语句之间用“：”来分隔。来分隔。4.长语句的分行长语句的分行 在在VB中系统用分行符中系统用分行符“_”把一个长语句分成若干行来存放。注意是空格把一个长语句分成若干行来存放。注意是空格加下划线再按回车键换行来实现。加下划线再按回车键换行来实现。5.标号的使用标号的使用标号是以标号名加冒号结束的字符串（标号的命名规则同变量命名规则）来标号是以标号名加冒号结束的字符串（标号的命名规则同变量命名规则）来标示这一行（相当于对某行命名），一般用在转向语句中。标示这一行（相当于对某行命名），一般用在转向语句中。例例3.1 标号的应用示例标号的应用示例Priva

4、te Sub Form_Click()Dim i As Integeraa:i=Val(InputBox(请输入请输入i的值的值)aa为行号为行号 If i 100 Then MsgBox 太小哦！请重新输入！太小哦！请重新输入！GoTo aa:Else GoTo c1 End Ifc1:Print 你输入的是数值符合规则！你输入的是数值符合规则！c1为行号为行号End Sub上述代码中，上述代码中，aa和和c1都是行号，应用都是行号，应用GoTo 语句可以改变程序行间的运行顺序语句可以改变程序行间的运行顺序 12/29/202243.2 数据类型数据类型l数据是信息的物理表示形式，是程序处理

5、的对象。数据是信息的物理表示形式，是程序处理的对象。在使用计算机来处理数据时，会遇到各种不同类在使用计算机来处理数据时，会遇到各种不同类型的数据。例如，一个人的姓名是由一串文本型的数据。例如，一个人的姓名是由一串文本(字字符符)组成，成绩、年龄和体重都是一个数值，而是组成，成绩、年龄和体重都是一个数值，而是否大学毕业则是一个逻辑值，等等。为了更好地否大学毕业则是一个逻辑值，等等。为了更好地处理各种各样的数据，处理各种各样的数据，VB定义了多种数据类型。定义了多种数据类型。l在计算机中确定数据类型的作用有两个：一是在生成数据在计算机中确定数据类型的作用有两个：一是在生成数据时，它指出应为数据分配

6、多大的存储空间；二是它规定了时，它指出应为数据分配多大的存储空间；二是它规定了数据所能进行的操作。数据所能进行的操作。12/29/20225数据数据类类型型类类型符型符号号占字占字节节数数取取值值Byte（字（字节节型）型）无无10255Boolean（逻辑逻辑型）型）无无2False和和TrueInteger（整型）（整型）%2-3276832767Long（长长整型）整型）&4-21474836482147483647Single（单单精度型）精度型）!4负负数：数：-3.402823E38-1.401298E-45正数：正数：1.401 298E-453.402823 E38Object

7、（对对象型）象型）无无4任何任何对对象的引用象的引用Double（双精度型）（双精度型）#8负负数：数：-1.79769313486232D308-4.94065645841247D-324正数：正数：4.940656458412 47D-3241.79769313486232D308Currency（货币货币型）型）8-922337203685477.580 0922337203685477.580 7Date(time)（日期型）（日期型）无无801,01,10012,31,9999String（字符型，定（字符型，定长长）$自定的字符串自定的字符串长长度度String（字符型，（字符型，

8、变长变长）$不确定不确定Variant（变变体型）体型）无无不确定不确定表表3.1 Visual Basic 的标准数据类型的标准数据类型3.2.1 标准数据类型标准数据类型12/29/20226使用使用“Type”语句来定义。其格式为：语句来定义。其格式为：Type 自定义数据类型名自定义数据类型名元素名元素名1 （下标）（下标）As 类型名类型名 元素名元素名2 （下标）（下标）As 类型名类型名元素名元素名n （下标）（下标）As 类型名类型名End Type3.2.2 用户自定义的数据类型用户自定义的数据类型12/29/20227说明：说明：元素名元素名：自定义类型中的一个成员。下标下

9、标：如果不省略表示的是数组。类型名类型名：为3.2.1中所讲的标准数据类型。一旦定义好了类型，就可以在变量的声明时使用该类型。使用的方式是：Dim 变量名变量名 AS 自定义数据类型名自定义数据类型名变量名变量名.元素名元素名X（下标）（下标）注意：u自定义类型须在标准模块（.bas）中定义，默认类型为Public。u自定义类型中的元素类型可以是字符串，但必须是定长的字符串。例例3.2 自定义数据类型的定义和应用自定义数据类型的定义和应用。12/29/202283.3 变量和常量变量和常量3.3.1 变量和常量的命名规则变量和常量的命名规则u不能使用不能使用VB中的关键字；中的关键字；u必须以

10、字母或者汉字开头，且由字母、汉字、必须以字母或者汉字开头，且由字母、汉字、数字或下划线组成，长度不超过数字或下划线组成，长度不超过255个字符；个字符；u为了增加程序的可读性，命名一般遵守匈牙利为了增加程序的可读性，命名一般遵守匈牙利命名法规定；命名法规定；u不区分大小写不区分大小写12/29/20229变量：变量：是在程序运行中其值可以发生变化的量。是在程序运行中其值可以发生变化的量。u在使用变量前先声明变量名和类型，从而决定系统为它在使用变量前先声明变量名和类型，从而决定系统为它分配的存储单元（地址和大小）。分配的存储单元（地址和大小）。u 在在VB中变量的声明分为显式声明和隐式声明两种：

11、中变量的声明分为显式声明和隐式声明两种：3.3.2 变量声明变量声明12/29/2022101、显式声明、显式声明显式声明就是对变量先声明后使用，有以下几种形式几种形式：Dim 变量名变量名 As 类型类型Private 变量名变量名 As 类型类型Public 变量名变量名 As 类型类型Static 变量名变量名 As 类型类型 来声明静态变量注意：注意：u静态变量声明不能放在通用声明部分中声明静态变量声明不能放在通用声明部分中声明。uAs 类型类型：表示该部分可省略。缺省“As 类型”部分，则所创建的变量默认为变体类型。uAs 类型可用在变量名后加类型符来表示，此时变量名与类型符之间不能

12、有空格。例如：例如：Dim intA as integer,intB as integer,dblC as double 等价于：等价于：Dim intA%,intB%,dblC#12/29/202211Dim 字符串变量名字符串变量名 As StringDim 字符串变量名字符串变量名 As String*字符数字符数前一种方法定义的字符串将是不定长的字符串，最多可以存放2MB个字符；后一种方法定义的字符串，存放的最多字符个数由定义的字符数决定。例如：Dim strSS1 as string 声明可变长字符串变量Dim strSS2 as string*50 声明字符串变量最多可存放50个字

13、符对于上例声明的strSS2定长的字符串变量，若赋予的字少于50，则右补空；若赋予的字超过50个，则多余部分截去。12/29/2022122、隐式声明、隐式声明在VB中，隐式声明隐式声明指变量未进行声明而直接使用，所有的隐式声明的变量都是Variant类型的。Private Sub Command1_Click()a=50 变量变量a未经声明而直接引用未经声明而直接引用 Print aEnd Sub 使用隐式声明易出错，在VB中提供了强制声明的方法，即在窗体或模块的通用声明部分中加上一条如下语句：Option Explicit这个语句使编译器要求检查每个变量的声明，如果用的变量没有声明，则发出

14、一个错误信息。12/29/202213l有时在实际的应用中，需要将变量的数据类型转换为另一种数据类型，这样变量的数据类型就发生了改变。表3.2列出了进行变量类型强制转换的函数。函数函数返回返回类类型型例子例子例子返回例子返回值值CBoolBooleanCbool(23)TrueCByteByteCbyte(23)23CIntIntegerCint(200070.10024)200070CLngLong略略CDblDouble略略CSngSingle略略CStrStringCStr(2006011100.11)2006011100.11CDateDateCdate(“2007-10-17”)20

15、07-10-17CCurCurrencyCcur(233.33345)233.3334CVarVariant略略CVErrErrorCVErr(100)错误错误100表表3.2 数据类型强制转换函数数据类型强制转换函数12/29/202214常量：常量：是在程序运行中是不发生变化的数字、字符是在程序运行中是不发生变化的数字、字符 或表达或表达 式。式。常量分为两类：常量分为两类：一类是用户自己声明的常量（一类是用户自己声明的常量（符号常量符号常量）一类是一类是VB系统自身提供的常量（系统自身提供的常量（系统常量系统常量）3.3.4 常量声明常量声明12/29/2022151、用户自定义常量、用

16、户自定义常量用用Const语句来自定义常量，其格式为：语句来自定义常量，其格式为：PublicPrivateConstAs=表达式表达式或：或：Const 常量名常量名=表达式表达式 例：Const pi=3.141 592 6 PrivateConstconName=Beijing(String)PublicConstmaxASInteger=50 12/29/202216 定义符号常量时，也可以在常量名后面定义符号常量时，也可以在常量名后面 加上类型说明符，例如：加上类型说明符，例如：Constpi#=3.1415926 定义定义pi为双精度型为双精度型 Constg!=9.8定义定义g为

17、单精度型为单精度型注意：注意：一般可以把常量的定义放在窗体的通用过程当中。一般可以把常量的定义放在窗体的通用过程当中。12/29/202217 系统常量是指VB系统提供的应用程序和控件的常量。系统定义的常量位于对象库中，在“对象浏览器”中的Visual Basic(VB)、Visual Basic for Applications（VBA）等对象库中都列举了VB的常量。常常 量量描描 述述vbRed红色vbGreen绿色【例】“Label1.BackColor=vbGreen”是将Label1对象的背景颜色设置为绿色。3.3.5系统提供的常量系统提供的常量表3.3 WindowsState常量

18、注意：注意：如果要用系统内部常量来设置一个对象的属性时，如果要用系统内部常量来设置一个对象的属性时，应该在代码窗口中进行设置，而不能在属性窗口中设置。应该在代码窗口中进行设置，而不能在属性窗口中设置。12/29/2022183.4 常用内部函数常用内部函数函数名函数名功能功能说说明明举举例例结结果果Mid$(C,N1,N2)Mid$(C,N1,N2)从字符串从字符串C C的的N1N1位开始向右位开始向右载载取取N2N2个字符个字符Mid$(Mid$(“ABCDEFGABCDEFG”,2,4)2,4)“BCDEBCDE”Left$(C,NLeft$(C,N)截取字符串截取字符串C C左左边边N

19、N个字符个字符Left$(Left$(“abcdeabcde”,3,3)“abcabc”Right$(C,NRight$(C,N)截取字符串截取字符串C C右右边边N N个字符个字符Right$(Right$(“abcdeabcde”,3)3)“cdecde”String$(N,CString$(N,C)产产生由生由C C串中第一个字符串中第一个字符组组成的成的N N个字符个字符String$(2,String$(2,“ABCDABCD”)“AAAA”Len(CLen(C)字符串字符串C C的的长长度度Len(Len(“ABCDEABCDE”)5 5Ltrim$(CLtrim$(C)去掉字符串

20、左去掉字符串左边边的空格的空格LtrimLtrim$($(“abcabc”)“abcabc”Rtrim$(CRtrim$(C)去掉字符串右去掉字符串右边边的空格的空格Ltrim$(Ltrim$(“abcabc ”)“abcabc”Space$(NSpace$(N)产产生生N N个空格个空格Space(3)Space(3)“”InStr(N1,C1,C2,NInStr(N1,C1,C2,N)在在C1C1中从中从N1N1开始找开始找C2C2首次出首次出现现的位置，的位置，N=0N=0区分大小写；区分大小写；N=1N=1，不区分大小写，不区分大小写InStr(2,InStr(2,“ABCDASFAB

21、CDASF”,“A A”)5 5StrComp(C1,C2,N)StrComp(C1,C2,N)字符串比字符串比较较，C1C1大大为为1 1，C1C1小小为为-1-1，相等，相等为为0 0。N=0N=0区分大小区分大小写，写，N=1N=1不区分大小写不区分大小写StrComp(asStrComp(as,AS,0)AS,0)1 1表表3.4 常用字符串函数表常用字符串函数表1.字符串函数及字符串编码字符串函数及字符串编码12/29/202219字符串编码字符串编码 VB6.0中采用中采用Unicode编码来存储和操作字符串，可是在编码来存储和操作字符串，可是在Windows 系统中用系统中用DB

22、CS（Double Byte Character Set）来）来存储和操作字符串。存储和操作字符串。Unicode编码编码是一种用两个字节表示一个字符的字符集是一种用两个字节表示一个字符的字符集.DBCS编码编码（Double Byte Character Set）是在）是在Windows系统中对字符采用的编码方式，是一套单字节与双字节的混合系统中对字符采用的编码方式，是一套单字节与双字节的混合编码，其中西文与编码，其中西文与ASCII编码一样，使用单字节编码，东亚文编码一样，使用单字节编码，东亚文字使用双字节编码。字使用双字节编码。12/29/202220例例3.3 建立包含一个窗体的工程，

23、在建立包含一个窗体的工程，在Form_Click()中填写如下中填写如下 代码，运行结果见图代码，运行结果见图3.2。Dim s1 As String,s2 As String s1=只要你努力，你一定可以学好只要你努力，你一定可以学好VISUAL BASIC Print Print 用用Unicode编码时编码时len(s1)=;Len(s1)Print 用用Unicode编码时编码时lenb(s1)=;LenB(s1)Print Print 转换后：转换后：Print s2=StrConv(s1,vbFromUnicode)将将s1进行用进行用Unicode编码字符编码字符串转换并赋值给串

24、转换并赋值给 s2 Print 用用DBCS编码时编码时len(s2)=;Len(s2)Print 用用DBCS编码时编码时lenB(s2)=;LenB(s2)12/29/2022212.转换函数转换函数 转换函数是将各种不同数据类型的值相互之间进行转换的函数。转换函数是将各种不同数据类型的值相互之间进行转换的函数。函数名函数名功能功能说说明明举举例例结结果果Val(C)数字字符串数字字符串转换为转换为数数值值Val(“123ABC”)123Asc(C)字符字符转换转换成成ASCII码值码值Asc(“a”)97Chr$(N)ASCII码值转换码值转换成字符成字符Chr$(65)“A”Lcase

25、$(C)大写大写转换转换成小写成小写Lcase$(“ABC”)“abc”Ucase$(C)小写小写转换转换成大写成大写Ucase$(“abc”)“ABC”Fix(N)取整数部分取整数部分Fix(-3.6)-3Hex$(N)十十进进制制转换转换成十六成十六进进制制Hex(100)64Int(N)取不大于取不大于N的最大整数的最大整数Int(-3.6)Int(3.6)-43Oct$(N)十十进进制制转换转换成八成八进进制制Oct$(100)“144”Str$(N)数数值转换值转换成字符串成字符串Str$(123.45)“123.45”表表3.5 常用转换函数表常用转换函数表12/29/202222

26、u Chr（）和（）和Asc（）函数功能相反，即（）函数功能相反，即Chr（Asc（C）、）、Asc（Chr（N）的结果为原来各自参数的值。）的结果为原来各自参数的值。如如 Asc（Chr（70）的结果还是）的结果还是70。u Val（）函数将数字字符串转换为数值类型，当字符串中出现（）函数将数字字符串转换为数值类型，当字符串中出现数值类型规定的字符外的字符时，则停止转换，函数返回的是数值类型规定的字符外的字符时，则停止转换，函数返回的是停止转换前的结果。停止转换前的结果。例如表达式例如表达式Val（”-154.56yt”）结果为）结果为-154.56，Val（“-154.56u3”）结果为）

27、结果为-154.56,Val(abcde)结果为结果为0,Val(A12)的值为的值为 0 常用转换函数的几点说明：常用转换函数的几点说明：12/29/2022233.数学函数数学函数表表3.6 常用数学函数表常用数学函数表函数名函数名功能功能说说明明举举例例结结果果Abs(n)取取绝对值绝对值Abs(-5.6)5.6Cos(n)余弦函数余弦函数Cos(0)1Sin(n)正弦函数正弦函数Sin(0)0Atn(n)反正切函数反正切函数Atn(0)0Tan(n)正切函数正切函数Tan(0)0Exp(n)e为为底的指数函数底的指数函数eNExp(6)403.428793Log(n)e为为底的自然底的

28、自然对对数数Log(8)2.07944Rnd(n)产产生随机数生随机数Rnd取取值值区区间间0，1)Sgn(n)符号函数：符号函数：n0，sgn(n)=+1，n0，sgn(n)=-1，n=0，sgn(n)=0Sgn(-6)-1Sqr(n)平方根平方根Sqr(16)412/29/202224注意：注意：（1）三角函数的参数n以弧度表示。1度度=/180=3.14159/180（弧度）（弧度）如：求如：求 的正弦值，应写为的正弦值，应写为 Sin(67*3.14156/180)（2）Sqr的参数必须大于或者等于的参数必须大于或者等于0。（3）随机函数随机函数Rnd可以模拟自然界中各种随机现象。它可

29、产生可以模拟自然界中各种随机现象。它可产生 一个一个 0,1)的随机数；的随机数；使用使用Randomize语句可以为随机数生成器指定不同的初值或者称语句可以为随机数生成器指定不同的初值或者称 为随机数为随机数 序列的序列的“种子种子”，这样可以得到不同的随机数序列。，这样可以得到不同的随机数序列。Rnd通常与通常与Int函数配合使用函数配合使用 生成生成a,b区间范围内的随机整数，可以采用区间范围内的随机整数，可以采用 Int(b-a+1)*Rnd)+a 例如例如:Int(4*Rnd+1)可以产生可以产生1,4之间的随机整数之间的随机整数;Int(rnd*28)+10，则产生，则产生10,3

30、7之间的随机数。之间的随机数。例例3.4 产生产生1个随机二位整数，在文本框中输出。个随机二位整数，在文本框中输出。Private Sub Command1_Click()Randomize Text1=Int(Rnd*90+10)End Sub12/29/2022254.日期函数日期函数表3.7 常用日期函数表函数名函数名功能功能说说明明例例结结果果Day(C|N)返回日期代号（131）Day(“07,05,26”)6MonthName(N)返回月份代号（112）MonthName(5)五月Now返回月份名Now2007/11/14 21:09:26Time$()返回系统日期和时间Time2

31、1:09:50WeekDay(C|N)返回星期代号（17）WeekDay(“07,11,14”)4即 星期三WeekDayName(N)返回星期代号所转换为的星期名称WeekDayName(6)星期五Year(C|N)返回年代号（17532078）Year(1361)1903DateDiff函数函数形式：DateDiff（要间隔日期形式，增减量，要增减的日期变量）（要间隔日期形式，增减量，要增减的日期变量）作用：两个指定的日期按日期形式求相差的日期。要间隔的日期形式见表3.8。DateAdd增减日期函数增减日期函数形式：DateAdd（要增减日期形式，增减量，要增减的日期变量）（要增减日期形式

32、，增减量，要增减的日期变量）作用：对要增减的日期变量按日期形式做增减。要间隔日期形式见表3.8。例如：DateAdd(“WW”,2,#11/14/2007#)返回值是在指定的日期上加2周，所以函数的结果为：#11/28/2007#。12/29/202226表3.8 日期形式表注意：y、d、w在DateAdd函数中作用相同。日期形式日期形式snhwwwdymqyyyy意义秒分时星期 一周的日数 日一年的天数月季年5.格式输出函数格式输出函数格式输出函数用Format函数来实现，其格式如下：Format（表达式（表达式，格式字符串，格式字符串）其中，表达式是要格式化的数值、日期和字符串类型表达式。

33、格式字符串是表示按其指定的格式输出表达式的值。格式字符串有三类：数值格式、日期格式和字符串格式。格式字符串要加引号。12/29/202227数值格式化数值格式化是将数值表达式的值按是将数值表达式的值按“格式字符串格式字符串”指定的格式输出。指定的格式输出。符号符号作用作用数数值值表达式表达式格式化字符串格式化字符串显显示示结结果果0实际实际数字小于符号位数，数数字小于符号位数，数字前后加字前后加04321.7654321.765“00000.0000”“000.00”04321.76504321.77.加小数点加小数点6452“0000.00”6452.00E+用指数表示用指数表示0.7894

34、“0.00E+00”7.89E-01E-与与E+相似相似4567.897“.00E-00”.46E04#实际实际数字小于符号位数，数数字小于符号位数，数字前后不加字前后不加08527.2238527.223“#.#”“#.#”8527.2238527.22$在数字前加在数字前加$5678.567“$#.#”$5678.57+在数字前加在数字前加+-5678.567“+#.#”-+5678.57-在数字前加在数字前加-5678.567“-#.#%”-567856.7%,千分位千分位5678.567“#,#0.0000”5,678.5670%数数值值乘以乘以100，加百分号，加百分号5678.56

35、7“#.#%”567856.7%表3.9 常用数值格式化符及举例表12/29/202228符号符号“0”或或“#”二者的比较：二者的比较：同：同：若要显示数值表达式的整数部分位数多于格式字符串的位数，按实际数值显示；若小数部分的位数多于格式字符串的位数，按四舍五入显示。异：异：“0”按其规定的位数显示，“#”对于整数前的0或小数后的0不显示。例例3.5 格式符应用举例。运行界面如图3.4所示。Private Sub Command1_Click()a=789.45678 b=56 Print Format(a,0.00),Format(b,-0.00)Print Format(a,#.#),F

36、ormat(b,-#.#)End Sub12/29/202229日期和时间格式化：日期和时间格式化：将日期类型表达式的值和或数值表达式的值按指定的格式输出 表表3.10 常用日期和时间格式符表常用日期和时间格式符表符号符号作用作用符号符号作用作用m显示月份（112），个位前不加0mm显示月份（0112），个位前加0mmm显示月份缩写（JanDec）mmmm月份全名（JanuaryDecember）d显示日期（1-31），个位前不加0dd显示日期（0131），个位前加0ddd显示星期缩写（Sun-Sat）dddd显示星期全名（SundaySaturday）dddd显示完整日期（yy/mm/dd）

37、ddddd显示完整长日期（yyyy年m月d日）h显示小时（023），个位数前不加0hh显示小时（0023），个位前加0m在h后显示分（059），个位前不加0mm在h后显示分（0059），个位前加0s显示秒（059），个位前不加0ss显示秒（0059），个位前加0y显示一年中的天（1366）yy两位数显示年份（0099）yyyy四位数显示年份（01009999）q季度数（14）w星期为数字（17，1是星期日）ww一年中的星期数（153）tttt显示完整时间（小时、分和秒），默认的格式为hh：mm：ssAM/PMam/pm12小时的时钟，午前为AM或am，午后为PM或pmA/P,a/p12小时的时

38、钟，中午前A或a，中午后P或p12/29/202230例例3.6 应用Format（）函数显示有关的日期和时间。运行界面如图3.5所示。建立相应的对象（一个窗体）并编写代码。Private Sub Form_Click()FontSize=15 MyTime=#10:21:30 PM#MyDate=#8/21/2007#Print Tab(2);Format(Date,dddd,mmmm,dd,yyyy)显示系统当前日期 Print Tab(2);Format(Now,yyyy年m月dd日 hh：mm)显示系统当前日期和时间 Print FormatDateTime(Now)vb6.0新提供的

39、函数 Print Tab(2);Format(MyDate,m/d/yy)Print Tab(2);Format(MyDate,mmmm-yy)Print Tab(2);Format(MyTime,h-m-s AM/PM)Print Tab(2);Format(MyTime,hh:mm:ss A/P)End Sub图3.Format函数示例12/29/202231字符串格式化字符串格式化是将字符串按指定的格式进行如大小写转换显示等 表表3.11 常用字符串格式符及举例常用字符串格式符及举例符号符号作用作用举举例例结结果果字符由右向左填充，当实际字符位数小于符号位数的时候，字符前面要加空格做补充

40、。Format(DDE,)DDE&字符由右向左填充，当实际字符位数小于符号位数的时候，字符前面不加空格做补充。Format（DDE,&）DDE强制小写，实现所有字符按小写的格式显示。Format（”NIkE”,”强制大写，实现所有字符按大写的格式显示。Format（”niKe”,”）NIKE！强制由左而右填充字符占位符。默认值是由右而左填充字符占位符。Format（”DDE”,”!”）DDE变换变量类型函数：变换变量类型函数：这里所提到的变换变量类型函数是指实现不同数据类型间变量类型的强制转换 12/29/202232Shell函数函数为了调用各种应用程序，VB提供了一个函数来实现，即通过sh

41、ell函数来实现。Shell 函数格式如下：Shell（命令字符串（命令字符串，窗口，窗口类类型型）对Shell 函数的说明：命令字符串：要执行的应用程序名，包括路径，应用程序必须是可执行文件（即程序扩展名为.COM、.EXE、.BAT）。其中命令字符串路径有两种表达方式：1、用绝对路径；2、用start方式。窗口类型：表示执行应用程序的窗口大小，一般取1。函数成功调用的返回值为一个任务标识ID，它是运行程序的唯一标识。图3.6 shell函数调用录音机程序例3.7 应用shell函数调用Windows系统自带的录音机应用程序。用两种方式来实现，代码如下：方法一：i=Shell(c:windo

42、wssystem32 ndrec32.exe,1)方法二：j=Shell(start&ndrec32.exe,1)运行结果如图3.6所示.。12/29/2022333.5 运算符运算符在VB中，运算符可分为算术运算符、比较运算符、逻辑运算符和字符串运算符四类。1.算术运算符算术运算符（优先顺序从高到低）（优先顺序从高到低）运算含运算含义义运算符运算符优优先先级别级别例例 子子结结 果果乘方14216取负值-2-4-4乘*34*416除/310/42.5整除410 42取余数Mod510 mod 42加+610+414减-610-46表表3.12 算术运算符算术运算符12/29/202234u注

43、意：30-True30-True 结果是结果是3131，逻辑量，逻辑量TrueTrue转为数值转为数值-1-1，FalseFalse转为转为0 0False+10+”4”False+10+”4”结果是结果是14147.747.74等于等于2 2 整除之前先将小数部分四舍五入整除之前先将小数部分四舍五入 17/517/5等于等于3.4 3.4 20 Mod 520 Mod 5等于等于0 0，1 Mod 31 Mod 3等于等于1 112/29/202235运算符及其优先级：运算符及其优先级：(乘方乘方)-(求负求负)*/Mod+-示例：示例：5*x10+x/6 x(1/3)15 Mod 612/

44、29/202236 根据运算符的优先级，该表达式的计算步骤如下：根据运算符的优先级，该表达式的计算步骤如下：计算乘除，得到：计算乘除，得到：2+12.8 Mod 17.522.162+12.8 Mod 17.522.16 计算整除（计算整除（），得到：），得到：2+12.8 Mod 92+12.8 Mod 9 （17.5217.52和和2.162.16两数先四舍五入为两数先四舍五入为1818和和2 2）求余运算（求余运算（ModMod），得到：），得到：2+42+4 （12.812.8先四舍五入为先四舍五入为1313）。）。求和运算，得到表达式的最后结果为：求和运算，得到表达式的最后结果为：6

45、 6例例 计算计算 2+3.2*4 Mod 17.52 4.32/2 的值的值12/29/202237 1+2*14 Mod 17 6/2=？求出下列表达式的值求出下列表达式的值想一想想一想 1.按运算符的优先级分成若干运算步骤按运算符的优先级分成若干运算步骤 先乘除，再整除先乘除，再整除 和求和求Mod，后加运算，后加运算 2.根据运算符的运算功能求出各步骤的结果根据运算符的运算功能求出各步骤的结果思考题思考题 1+28 Mod 5 结果为结果为 412/29/2022382.比较运算符比较运算符比较运算是比较两个对象的大小或者匹配情况，其中对象可以是字符、数字等。比较运算符是双目运算符，比

46、较的结果有True和False两种 表表3.13 VB比较运算符比较运算符 含含义义运算符运算符例子例子结结果果不等于ABWABVTrue等于=AE=ABVFalse大于AEABVTrue大于等于=ABW=ABVTrue小于5689True小于等于=67=67True字符串匹配LikeABWGHJ“likeBWTrue对象引用比较Is12/29/202239在比较运算中，比较规则如下在比较运算中，比较规则如下：两个操作对象是数值型数值型，按其大小进行比较；两个操作对象是字符型字符型，按字符的ASCII码值从左到右一一进行比较，即首先比较两个字符串的第1个字符，其中ASCII码值大的字符串大，如

47、果第1个字符相同，则比较第2个字符，以此类推，直到出现不同字符为止，如果全等则两个字符相等。两个操作对象是汉字汉字，先将汉字转换为相对应的汉语拼音字符，然后再进行比较。如“男”和“女”比较，首先转换为“nan”和“nv”，因为第一个字符相同，因此比较第二个字符，而“a”小于“v”，因此“男”小于“女”。在VB6.0中，增加了“Like”运算符，与通配符“？”、“*”、“#”、范围、！范围结合使用，在SQL（结构化查询语句：Structure Query Language）语句中经常使用，用于模糊查询。新增的“Is”关系运算符用于对两个对象变量引用进行比较 12/29/2022403.逻辑运算符

48、（优先顺序从高到低）逻辑运算符（优先顺序从高到低）逻辑运算是对判断的逻辑值True和False进行操作的运算，是将操作数进行逻辑运算，结果依然是逻辑型数值。逻辑运算符除Not是单目运算符外，其余都是双目运算符。表3.14 VB中逻辑运算符含含义义运算运算符符优优先先级级说说明明例例结结果果取反Not1当操作数是假时，结果为真 Not F T与And2两个操作数均为真时，结果为真T and FT and TFT或Or3两个操作数中有一个为真时，结果为真T or FF or FTF等价Eqv4两个操作数相同时，结果为真T Eqv FF Eqv FFT异或Xor3两个操作数一真一假时，结果为真T X

49、or FT Xor TTF蕴含Imp5第一个操作数为真，第二个操作数为假，结果才为假，其余为真T Imp FT Imp TFT12/29/2022414.4.字符串连接运算符字符串连接运算符+&举例举例结果结果举例举例结果结果“100”+123223“100”&123“100123”“100”+“123”“100123”“100”&“123”“100123”“abc”+123出错出错“abc”&“123”“abc123”“abc”&123“abc123”u使用运算符使用运算符“&”&”时，在变量和运算符时，在变量和运算符“&”&”之间需加一个之间需加一个空格。空格。u注意：使用运算符注意：使用

50、运算符“+”+”，得到的不一定为字符串。，得到的不一定为字符串。12/29/202242u“+”+”的运算规则：的运算规则：连接运算符两边的运算对象应为字连接运算符两边的运算对象应为字符型；若均为数值型则进行算术加运算；若一个为字符符型；若均为数值型则进行算术加运算；若一个为字符型，另一个为数值型则出错。型，另一个为数值型则出错。u“&”&”的运算规则：的运算规则：不论连接运算符两边的运算对象是不论连接运算符两边的运算对象是字符型还是数值型，进行连接时系统先将运算对象转换字符型还是数值型，进行连接时系统先将运算对象转换成字符型，然后再连接。成字符型，然后再连接。12/29/2022433.6