VB教程第2章教案

1、程序中的大部分实际工作是采用程 序代码来处理的。常量、变量、 函数及表达式是构成VB应用程 序的基本元素，也是程序设计 的重要基础知识。学习和熟悉 掌握这些元素，对以后的程序 设计是十分重要的。 2.1 2.1 数据类型数据类型 在使用计算机来处理数据时，会遇到各种不同类型的数据。 例如，一个人的姓名是由一串文本(字符)组成，成绩、年龄和体 重都是一个数值，而是否大学毕业则是一个逻辑值，等等。 为了更好地处理各种各样的数据，VB定义了多种数据类型， 每种数据类型占用一定的内存，允许存储一定范围的值。 数据类型 标准数据类型 自定义数据类型 数值型 （numeric） 日期型（Date） 逻辑型

2、（Boolean） 字符型（String） 对象型（Object） 变体型（Variant） 整型（Integer） 长整型（Long） 货币型（Curency） 字节型（Byte） 单精度浮点数最多有7位有效数字，如果某个数的有效数字位 数超过7位，当把它赋给一个单精度变量时，超出的部分会自动四 舍五入。 例如：把213456.2567赋给单精度变量aa， 在内存中aa的值为213456.3。 如超出某个表示范围，则用科学记数法 例如：4.53E8(4.53108)，8.173E-14（8.173 10-14 ） 单精度浮点数有多种表示形式： n.n(小数形式) n!(整数加单精度类型符)

3、nEm(指数形式) n.nE m (指数形式) 例如：123.45、0.12345E+3、123.45！都是同值的单精度数。 双精度浮点数最多可有15位有效数字。 科学记数法格式 ：aDc或adc 例如314.159265358979D-2表示3.14159265358979。 注意：E和D作为指数符号，只能出现在数的中间，其后的指数必须 是整数。 (4) 货币型(Currency) 专门为处理货币而设计的数据类型，是一种特殊的小数。它可 最多保留小数点右边4位和小数点左边15位。 如果变量已定义为货币型，且赋值的小数点后超过4位，那么 超过的部分自动四舍五入。 例如，将3.12125赋给货币

4、型变量aa，在内存中aa的实际值是 3.1213。 (5) 变体型(Variant)数据 变体型数据是一种可以随时改变数据类型的数据，可以存放任 何类型的数据，VB会自动完成必要的转换。不特别说明时，VB会自 动将该变量默认为Variant型变量。 例： Temp=“22” 字符串 Temp=Temp-1 数值 Temp=#01/01/2002# 日期 Dim SomeValue As Variant 定义SomeValue为变体型变量 SomeValue = “17” SomeValue包含 “17” （双字 符的串） SomeValue = SomeValue - 15 现在 SomeVa

5、lue 包含数值2 SomeValue = U c End Sub 运行程序后单击窗体，输出结果是：运行程序后单击窗体，输出结果是： 处理后的数：处理后的数：63 例例2.1 给定一个两位数给定一个两位数(如如36)，交换个位数和十位数的位，交换个位数和十位数的位 置，把处理后的数显示在窗体上置，把处理后的数显示在窗体上 编写的窗体单击事件过程代码如下：编写的窗体单击事件过程代码如下： Private Sub Form_Click() Dim a As Integer, b As Integer, c As Integer Randomize 初始化随机数生成器初始化随机数生成器 a = In

6、t(90 * Rnd + 10) 产生产生10,99区间内的随机整数区间内的随机整数 b = Int(90 * Rnd + 10) c = a + b 求两数之和求两数之和 Print 产生的两个随机数产生的两个随机数: ; a, b Print 和数和数: ; c End Sub 运行程序后单击窗体，输出结果是：运行程序后单击窗体，输出结果是： 产生的两个随机数：产生的两个随机数：56 71 和数：和数：127 例例2.2 通过随机函数产生通过随机函数产生2个两位正整数，求这个两位正整数，求这2个数个数 之和并显示出来之和并显示出来 再次运行程序，单击窗体后再次运行程序，单击窗体后 输出另一

7、组结果是：输出另一组结果是： 产生的两个随机数：产生的两个随机数：18 37 和数：和数：55 2.4.2 字符串函数 用于字符串的查找、比较、截取等。 说明： (1)函数Mid(字符串，p，n) 从第P个开始连续取n个字符 如：Mid(“ABCDEG”,3,2) 的结果为 ”CD” 若省略n，则得到的是从P开始的往后所有字符，如： Mid(“ABCDE”，2) 的结果为 “BCDE” (2)插入字符串语句Mid(字符串，p，n) =子字符串 该语句用“子字符串”替换“字符串”中从第P个开始的与 “子字 符串”等长的一串字符。 如：s=“abcde”,执行语句Mid（s,3）=“99” 结果s

8、=“ab99e”。 若带参数n，则用“子字符串”左起n个字符来替换“字符串” 中 从第P个开始的n个字符。 (3)在函数Instr中，f和k均为可选参数，f表示开始搜索的位 置(默认值为1)，k表示比较方式，若k为0(默认)，表示区 分大小写；若k为1，则不分大小写。 格式： Instr(f, 字符串1,字符串2,k) 如： Instr(3, ”A12a34A56”, ”A”) 的结果为 7 Instr(3, ”A12a34A56”, ”A”, 1) 的结果为 4 Instr(”A12a34A56”, ”A”) 的结果为 1 2.4.3 日期与时间函数 日期/时间函数用于进行日期和时间处理。

9、如： 函数Date返回系统日期，如返回日期为 #11/03/2001# 函数Time返回系统时间，如返回时间为 #7:03:28# 2.4.4 类型转换函数 类型转换函数用于数据类型的转换。 说明： Val函数将数字字符串转换为数值型数字时，会自动将字符 串中的空格去掉，并依据字符串中排列在前面的数值常量来定 值，如： Val(A12) 的值为 0 Val(12A12) 的值为 12 Val(1.2e2) 的值为 120 使用转换函数的示例 Private Sub Form_Click() x = 123 y = 123 a = Chr(Asc(x) + 5) b = Str(Val(x) +

10、 5) c = Val(Str(y) + 5) Print a,b, c End Sub 运行程序后单击窗体，输出结果是什么 ? ? 想一想想一想 6 128 1235 2.5.2 代码书写规则 在编写程序代码时，要遵守一定的规则。不能超越其规定来 自由发挥。 (1) 一行写多条语句。冒号分隔 Sum=Sum+x : Count=Count+1 (2) 一条语句写成多行 使用续行符(一个空格后面跟随一个下划线“_”)，将长语 句分成多行。如： Print Text1.Text x 不能写成 If a 5 Then x=10 Print “x=”；x 全角符号全角符号 全角符号全角符号 2.5.3 结构化程序的基本结构 VB支持结构化的程序设计方法。其程序结构清晰，可读性好， 也易于查错和修改。 结构化程序设计方法有三种基本控制结构： （1）顺序结构 （2）选择结构 （3）循环结构（当型循环和直到型循环） 三种基本结构的共同特点： （1）单入单出； （2）结构中的每个部分都有可能被执行； （3）在给出合理的 e 条件后，结构内不存在死循环。 A B 顺序结构 e AB 真假 分支结构 e A True False e A Fals