1、主页主页2022-7-301 常量、变量、函数及表达式常量、变量、函数及表达式是构成是构成VBVB应用程序的基本元素，应用程序的基本元素，也是程序设计的重要基础知识。也是程序设计的重要基础知识。学习和熟悉掌握这些元素，对学习和熟悉掌握这些元素，对以后的程序设计是十分重要的。以后的程序设计是十分重要的。主页主页2022-7-302第第2 2章章 程序设计基础程序设计基础 程序中的大部分实际工作是采用程序代码来处理的程序中的大部分实际工作是采用程序代码来处理的 任何一门程序设计语言都有一套严格的编程规定任何一门程序设计语言都有一套严格的编程规定 本章主要内容本章主要内容 退出退出数据类型数据类型常
2、量与变量常量与变量表达式表达式常用内部函数常用内部函数主页主页2022-7-303 2.12.1 数据类型数据类型 在使用计算机来处理数据时，会遇到各种不同类型的数据。在使用计算机来处理数据时，会遇到各种不同类型的数据。例如，一个人的姓名是由一串文本例如，一个人的姓名是由一串文本(字符字符)组成，成绩、年龄和体组成，成绩、年龄和体重都是一个数值，而是否大学毕业则是一个逻辑值，等等。重都是一个数值，而是否大学毕业则是一个逻辑值，等等。为了更好地处理各种各样的数据，为了更好地处理各种各样的数据，VBVB定义了多种数据类型定义了多种数据类型 数值型数值型 数据类型数据类型 字符型字符型 逻辑型逻辑型
3、 日期型日期型 对象型对象型 变体型变体型整数整数:整型整型/长整型长整型字节型字节型浮点型浮点型:单单/双精度双精度货币型货币型主页主页2022-7-304 数值型数据数值型数据 (1)(1)整型整型(Integer)(Integer)和长整型和长整型(Long)(Long)不带小数部分的数，表示正整数、负整数和零不带小数部分的数，表示正整数、负整数和零 整型数整型数:-32768-327683276732767 长整型数：长整型数：-2147483648-214748364821474836472147483647 (2)(2)字节型字节型(Byte)(Byte)字节型数可以表示无符号的整
4、数字节型数可以表示无符号的整数 0 0255255(3)(3)单精度型单精度型(Single)(Single)和双精度型和双精度型(Double)(Double)浮点数。表示带有小数部分的数浮点数。表示带有小数部分的数 表示数的范围大，但有误差。表示数的范围大，但有误差。如超出某个表示范围，则用科学记数法如超出某个表示范围，则用科学记数法 例如：例如：4.53E8(4.534.53E8(4.5310108 8)，8.173E-148.173E-14，3.14D233.14D23(4)(4)货币型货币型(Currency)(Currency)专门为处理货币而设计的数据类型专门为处理货币而设计的数
5、据类型 它可最多保留小数点右边它可最多保留小数点右边4 4位和小数点左边位和小数点左边1515位位主页主页2022-7-305其他类型数据其他类型数据 (1)字符型是用双引号括起来的一串字符。字符型是用双引号括起来的一串字符。例如例如:“Canton”、”1+2=?”、”GoodMorning”等等 ，其中，其中“”称为起止界限符。称为起止界限符。字符串长度字符串长度分为分为:变长字符串变长字符串(长度不固定长度不固定)定长字符串定长字符串(长度固定长度固定)例如：例如：Dim a As String a是是不定长字符串不定长字符串 Dim b As String*4 b是是定长字符串定长字符
6、串(4个字符个字符)a=“VB”a的值为的值为2个字符个字符“VB”a=“Visual Basic”a的值为的值为12个字符个字符“Visual Basic”b=“VB ”b的值为的值为4个字符个字符“VB ”(后面有后面有2个空格个空格)b=“Visual Basic”b的值为的值为4个字符个字符“Visu”主页主页2022-7-306其他类型数据其他类型数据 (2)逻辑型数据只有逻辑型数据只有True(真真)和和False(假假)两个值两个值 (3)日期型数据用两个日期型数据用两个“#”符号把日期和时间的值括起来符号把日期和时间的值括起来 如：如：#08/20/2001#、#2001-08
7、-20#(4)变体型变体型(Variant)数据是一种可变的数据类型，可以存放任数据是一种可变的数据类型，可以存放任何类型的数据，何类型的数据，VB会自动完成必要的转换会自动完成必要的转换 不特别说明时，不特别说明时，VB会自动将该变量默认为会自动将该变量默认为Variant型变量型变量 例：例：Temp=“22”字符串字符串 Temp=Temp-1 数值数值 Temp=#01/01/2002#日期日期主页主页2022-7-307 2.2 2.2 常量与变量常量与变量 2.2.1 2.2.1 常量常量 在程序运行期间其值始终保持不变的量在程序运行期间其值始终保持不变的量 直接常量直接常量：在程
8、序代码中直接给出的数据。：在程序代码中直接给出的数据。例如：例如：123，-263，”Visual Basic”，”12.57”等等 符号常量：符号常量：在程序中用符号表示的常量。在程序中用符号表示的常量。格式：格式：PublicPrivate Const 常量名常量名 As 数据类型数据类型=表达式表达式 例如：例如：Const PI As Single=3.14159主页主页2022-7-308 2.2.22.2.2 变量变量 变量是在程序运行期间其值可以发生变化的量变量是在程序运行期间其值可以发生变化的量 1.变量的命名规则变量的命名规则 应遵守一些规则应遵守一些规则 2.变量的声明变量
9、的声明 (1)声明变量声明变量(显式声明显式声明)用用Dim、Public、Private或或Static语句来声明变量语句来声明变量 例如：例如：Dim sum As Integer 把把sum定义为整型变量定义为整型变量 sum=3 (2)隐式声明隐式声明 不加说明就直接使用变量，此时默认的变量类型为变体型不加说明就直接使用变量，此时默认的变量类型为变体型 例如：例如：sum=3主页主页2022-7-309 (1)“值可变值可变”：当将某个数据存放到一个变量时，就把变量当将某个数据存放到一个变量时，就把变量中原有的值中原有的值“冲冲”掉，换成新的值。掉，换成新的值。例如，以下例如，以下2个
10、赋值语句：个赋值语句：a=3 a=8 同一变量在不同时刻可以取不同的值同一变量在不同时刻可以取不同的值 (2)“取之不尽取之不尽”：在运算过程中，如果没有改变该变量的值，：在运算过程中，如果没有改变该变量的值，那么，不管使用变量的值进行多少次运算，其值始终保持不变。那么，不管使用变量的值进行多少次运算，其值始终保持不变。例如例如 x=5 a=3+x x的值始终保持为的值始终保持为5 b=x*x 4*x 3.3.变量的两个重要特点变量的两个重要特点主页主页2022-7-3010 五类表达式：五类表达式：算术表达式算术表达式、字符串表达式字符串表达式、日期表达式日期表达式、关关系表达式系表达式和和
11、逻辑表达式逻辑表达式 1.算术表达式：算术表达式：运算符及其优先级：运算符及其优先级：(乘方乘方)-(求负求负)*/Mod+-示例：示例：9 /5=1.8,9 5=1,9 mod 5=1 2.字符串表达式：字符串表达式：运算符有两个：运算符有两个：&和和+”计算机计算机”&”网络网络”结果为结果为”计算机网络计算机网络”3.日期表达式日期表达式：#8/8/2001#-#6/3/2001#结果为结果为 66#12/1/2000#-32 结果为结果为#10/30/2000#2.3 2.3 表达式表达式结果？结果？主页主页2022-7-3011 1+2*14 Mod 17 6/2=？求出下列表达式的
12、值求出下列表达式的值想一想想一想 1.按运算符的优先级分成若干运算步骤按运算符的优先级分成若干运算步骤 先乘除，再整除先乘除，再整除 和求和求Mod，后加运算，后加运算 2.根据运算符的运算功能求出各步骤的结果根据运算符的运算功能求出各步骤的结果思考题思考题 1+28 Mod 5 结果为结果为 4主页主页2022-7-3012 内部函数是由内部函数是由VB系统提供系统提供 函数调用的一般格式为：函数调用的一般格式为：函数名函数名(参数参数1，参数，参数2，)返回函数值返回函数值 例如：例如：y=Sqr(x)Sqr是内部函数名，是内部函数名，x为参数，运行时该语句调用内部函为参数，运行时该语句调
13、用内部函数数Sqr来求来求x的平方根，其计算结果由系统返回给变量的平方根，其计算结果由系统返回给变量y VB的内部函数大体上分为四大类：数学函数，字符串函的内部函数大体上分为四大类：数学函数，字符串函数，日期与时间函数和转换函数。数，日期与时间函数和转换函数。2.4 2.4 常用内部函数常用内部函数主页主页2022-7-3013 说明说明：函数函数Int(x)是求小于或等于是求小于或等于x的最大整数。的最大整数。例如例如 Int(2)=2,Int(-2.5)=-3,Int(-3)=-3 利用利用Int函数可以对数据进行四舍五入。例如，对一个正数函数可以对数据进行四舍五入。例如，对一个正数x舍舍
14、去小数位时进行四舍五入，可采用如下式子：去小数位时进行四舍五入，可采用如下式子：Int(x+0.5)当当x=9.4时，时，Int(9.4+0.5)=9 当当x=9.5时，时，Int(9.5+0.5)=102.4.1 2.4.1 数学函数数学函数 主页主页2022-7-3014 随机函数随机函数Rnd可以模拟自然界中各种随机现象。它可产生可以模拟自然界中各种随机现象。它可产生一个一个(0,1)的随机数。在的随机数。在VB中，有一个称为中，有一个称为随机数生成器随机数生成器的随机的随机数生成程序，能产生一个随机数序列，用户每次调用数生成程序，能产生一个随机数序列，用户每次调用Rnd即可得即可得到这
15、个随机数序列中的一个。到这个随机数序列中的一个。使用使用Randomize语句可以为语句可以为随机数生成器随机数生成器指定不同的初值指定不同的初值或者称为随机数序列的或者称为随机数序列的“种子种子”，这样可以得到不同的随机数，这样可以得到不同的随机数序列。序列。Rnd通常与通常与Int函数配合使用函数配合使用 生成生成a,b区间范围内的随机整数，可以采用区间范围内的随机整数，可以采用 Int(b-a+1)*Rnd+a)例如例如 Int(4*Rnd+1)可以产生可以产生14之间之间(含含1和和4)的随机整数。的随机整数。可以是可以是1，2，3或或4，这由，这由VB运行时随机给定。运行时随机给定。
16、主页主页2022-7-3015 编写的窗体单击事件过程代码如下：编写的窗体单击事件过程代码如下：Private Sub Form_ClickPrivate Sub Form_Click()()Dim a As Single,b As Single,c As Single Dim a As Single,b As Single,c As Single a=6 a=6 b=9 b=9 c=Sqr(a c=Sqr(a *a+b a+b*b)b)Print c=;c Print c=;c End Sub End Sub 运行程序后单击窗体，输出结果是：运行程序后单击窗体，输出结果是：c=10.8166
17、5例例2.1 已知已知a=6，b=9，计算，计算c=例例2.122ba 主页主页2022-7-3016编写的窗体单击事件过程代码如下：编写的窗体单击事件过程代码如下：Private Sub Form_Click()Dim a As Integer,b As Integer,c As Integer Randomize 初始化随机数生成器初始化随机数生成器 a=Int(90*Rnd+10)产生产生10,99区间内的随机整数区间内的随机整数 b=Int(90*Rnd+10)c=a+b 求两数之和求两数之和 Print 产生的两个随机数产生的两个随机数:;a,b Print 和数和数:;c End
18、Sub运行程序后单击窗体，输出结果是：运行程序后单击窗体，输出结果是：产生的两个随机数：产生的两个随机数：56 71 和数：和数：127例例2.2 通过随机函数产生通过随机函数产生2个两位正整数，求这个两位正整数，求这2个数个数 之和并显示出来之和并显示出来 再次运行程序，单击窗体后再次运行程序，单击窗体后输出另一组结果是：输出另一组结果是：产生的两个随机数：产生的两个随机数：18 37 和数：和数：55例例2.2主页主页2022-7-3017 用于进行字符串处理用于进行字符串处理 说明：说明：(1)函数函数Mid(字符串，字符串，p，n)从第从第P个开始取个开始取n个字符个字符 示例：示例：
19、Mid(“ABCDEG”,3,2)的结果为的结果为”CD”若省略若省略n，则得到的是从，则得到的是从P开始的往后所有字符，如开始的往后所有字符，如 Mid(“ABCDE”，2)的结果为的结果为 “BCDE”(2)(2)函数函数Instr(fInstr(f,串串1,1,串串2,k)2,k)查找查找串串2在在串串1中的位置中的位置 f f 和和 k k 均为可选参数，均为可选参数，f f表示开始搜索的位置表示开始搜索的位置(默认值为默认值为1)1)，k k表示比较方式，若表示比较方式，若k k为为0(0(默认默认)，表示区分大小写；若，表示区分大小写；若k k为为1 1，则不，则不分大小写。分大小
20、写。例如例如 Instr(3,Instr(3,”A12a34A56A12a34A56”,”A A”)的结果为的结果为 7 7 Instr(3,Instr(3,”A12a34A56A12a34A56”,”A A”,1),1)的结果为的结果为 4 4 Instr(Instr(”A12a34A56A12a34A56”,”A A”)的结果为的结果为 1 1 (3)(3)函数函数LeftLeft(字符串，字符串，n)取左边取左边n个字符个字符 示例示例:Left(Left(”ABCDEABCDE”，2)2)的结果为的结果为 ”ABAB”2.4.22.4.2字符串函数字符串函数主页主页2022-7-301
21、8 先从字符串先从字符串a中找出某个指定字符中找出某个指定字符(本例为空格本例为空格)，再以此字符，再以此字符为界拆分成两个字符串。编写的窗体单击过程代码如下：为界拆分成两个字符串。编写的窗体单击过程代码如下：Private Sub Form_Click()Dim a As String,b As String,c As String,n As Integer a=VisualBasic 表示空格表示空格 n=InStr(a,)查找空格位置查找空格位置 b=Left(a,n-1)取左边部分取左边部分 c=Mid(a,n+1)取右边部分取右边部分 Print b 显示左边部分显示左边部分 Pri
22、nt c 显示右边部分显示右边部分 End Sub 程序运行后单击窗体，输出结果是：程序运行后单击窗体，输出结果是：Visual Basic例例2.32.3 使用字符串函数示例使用字符串函数示例例例2.3 处理方法处理方法 VisualBasic 先先查找查找 空格位置空格位置取右边部分取右边部分取左边部分取左边部分主页主页2022-7-3019 Private Sub Form_Click()Dim a As String,b As String,c As String,n As Integer a=“VisualBasic”表示空格表示空格 n=InStr(a,“”)查找空格位置查找空格位
23、置 b=Left(a,n-1)取左边部分取左边部分 c=Right(a,_)取右边部分取右边部分 Print b 显示左边部分显示左边部分 Print c 显示右边部分显示右边部分 End Sub 程序运行后单击窗体，输出结果是：程序运行后单击窗体，输出结果是：Visual Basic 若用若用 RightRight函数来代替函数来代替 MidMid函数函数,应如何改动？应如何改动？想一想想一想思考题思考题A.n B.Len(a)-n C.Len(a)B主页主页2022-7-3020 日期日期/时间函数用于进行日期和时间处理时间函数用于进行日期和时间处理 例如：例如：函数函数Date返回系统日
24、期，如返回日期为返回系统日期，如返回日期为#11/03/2001#函数函数Time返回系统时间，如返回时间为返回系统时间，如返回时间为#7:03:28#2.4.3 2.4.3 日期与时间函数日期与时间函数主页主页2022-7-3021 转换函数转换函数val()Val(A12)的值为的值为 0 Val(12A12)的值为的值为 12 Val(1.2e2)的值为的值为 120 Val(“12+3)=12,Val(“-12+3)=-12 Val(“+a+12)=0,Val(“+12+5)=12 Val（）函数的实现原理是这样的：（）函数的实现原理是这样的：从字符串中第一个字符开始检索，如果字符属于
25、从字符串中第一个字符开始检索，如果字符属于“0”到到“9”之间的字符，那么就把它转换为数字，一之间的字符，那么就把它转换为数字，一旦遇到不属于旦遇到不属于“0”到到“9”之间的字符的时候转换就停之间的字符的时候转换就停止。止。但有一个例外，就是第一个字符是正负号的时候，但有一个例外，就是第一个字符是正负号的时候，若符号后面紧跟着是数字，则转为数字，若为非数字若符号后面紧跟着是数字，则转为数字，若为非数字字符，则结果为字符，则结果为0 2.4.42.4.4 类型转换函数类型转换函数主页主页2022-7-30222.5程序代码编写规则 2.5.1语句及语法 本书关于VB语句的说明在38页上方主页主
26、页2022-7-3023 在编写程序代码时，要遵守一定的规则。不能超越其规在编写程序代码时，要遵守一定的规则。不能超越其规定来自由发挥。定来自由发挥。(1)一行写多条语句一行写多条语句。冒号分隔。冒号分隔 Sum=Sum+x:Count=Count+1 (2)一条语句写成多行一条语句写成多行 使用续行符使用续行符(一个空格后面跟随一个下划线一个空格后面跟随一个下划线“_”)，将长，将长语句分成多行。例如：语句分成多行。例如：Print Text1.Text&Text2.Text&Text4.Text _&Left(Text3.Text，3)(3)不区分大小写字母不区分大小写字母 VB不区分应用
27、程序代码字母的大小写不区分应用程序代码字母的大小写。2.5.22.5.2 代码书写规则代码书写规则主页主页2022-7-3024 (4)各关键字之间，关键字和变量名、常量名、过各关键字之间，关键字和变量名、常量名、过程名之间一定要有空格分隔。程名之间一定要有空格分隔。示例：示例：Private Sub Form_Click()(5)使用缩进使用缩进 在编写程序代码时，可以使用缩进来反映代码的逻辑结在编写程序代码时，可以使用缩进来反映代码的逻辑结构和嵌套关系。构和嵌套关系。例如：例如：Private Sub Form_Click()x=4 If x1 Then Print x=1 End If
28、End Sub主页主页2022-7-3025 (6)严格按照严格按照VB规定的格式和符号编写程序。规定的格式和符号编写程序。与其他高级语言一样，在与其他高级语言一样，在VB中使用的分号、引号、括号中使用的分号、引号、括号等符号都是英文状态下的半角符号，而不能使用中文状态下等符号都是英文状态下的半角符号，而不能使用中文状态下的全角符号。的全角符号。许多程序错误都是由此而起许多程序错误都是由此而起!例如：例如：If a5 Then x=10 Print x=;x 不能写成不能写成 If a 5 Then x=10 Print “x=”；x全角符号全角符号全角符号全角符号主页主页2022-7-3026 VBVB支持结构化的程序设计方法支持结构化的程序设计方法 其程序结构清晰，可读性好，也易于查错和修改其程序结构清晰，可读性好，也易于查错和修改 结构化程序设计方法有三种基本控制结构：结构化程序设计方法有三种基本控制结构：顺序结构、选择结构和循环结构顺序结构、选择结构和循环结构 具有具有单入口，单出口单入口，单出口的特点的特点 (a)(b)(c)顺序结构顺序结构 选择结构选择结构 循环结构循环结构AB假假真真L E真真假假AB E2.5.32.5.3 结构化程序的基本结构结构化程序的基本结构
