62 子过程的定义与调用本章目录.pptVIP

* * * * * * * * * * * 例6.11 编写程序，利用变量count统计单击窗体的次数。 Private Sub Form_Click() Static count% count = count + 1 Print 已单击窗体; count; 次 End Sub Private Sub Form_Click() Dim count% count = count + 1 Print 已单击窗体; count; 次 End Sub 6.5 变量的作用域 本章目录 6.6 综合应用 * 1. 数制转换 不同进制数之间的转换，可通过编程来实现；也可通过VB提供的内部函数：十进制转换为八进制函数（Oct）、转换为十六进制函数（Hex）来实现。 本章目录 * 例6.12 编一函数，实现一个十进制整数转换成二至十六任意进制的字符。 分析：十进制正整数m转换成r进制数，将m不断除r取余数(若余数超过9，还要进行相应的转换，例如10变成A，11变成B等)，直到商为零，以反序得到结果，即最后得到的余数在最高位。 6.6 综合应用 本章目录 * 2.加密和解密 信息加密是信息安全性的措施之一。信息加密有各种方法，最简单的加密方法是将每个字母平移一个位置( 称为密钥)。例如，后移5个位置，这时，A→F，B →G… Y →D，Z→E ，a →f ；解密是加密的逆操作。 例6.13 编一加密和解密的程序，即将输入的一行字符串中的所有字母加密，加密后还可再进行解密。 6.6 综合应用 本章目录 Welcome stud * W C 87 IAsc=Asc(C) 92 +5 IAsc90 IAsc=IAsc-26 B 对取得的一个字符“W”放入变量Ｃ中， 加密的过程如左图所示。 C=Chr(IAsc) 6.6 综合应用 本章目录 * 3. 查找 查找是在线性表(在此为数组)中根据指定的关键值，找出与其值相同的元素。 查找方法：一般有顺序查找和二分法查找。 顺序查找：将待查找的关键值与数组的元素逐一比较，若相同，则查找成功，若找不到，则查找失败。 例6.14 实现顺序查找。 6.6 综合应用 本章目录 * 4. 字符处理应用 例6.15 编写一个英文打字训练的程序，要求如下： (1)在标签框内随机产生30个字母的范文； (2)当焦点进入输入文本框时开始计时，并显示当时的时间； (3)当输入了30个字母时结束计时，禁止向文本框输入内容，显示打字的速度和正确率。 此题关键是：对输入的字符串与随机产生的字符串，一一对应比较，判断输入正确与否。 6.6 综合应用 本章目录 思考题 * 1. 为什么要使用过程？ 2. 简述子过程和函数过程的异同点？ 3. 什么是形参？什么是实参？实参与形参之间怎样传值？ 4. 按变量声明的位置可分为哪几种变量？ 5. 什么是静态变量？如何声明静态变量？ 本章目录 * * * * * * * * * * * * * * * * * * * * * * * * 第六章 过 程 6.1 函数过程的定义与调用 6.2 子过程的定义与调用 6.3 参数传递 6.4 递 归 6.5 综合应用 * * 例:已知 的值。 4 7 ，求 C m!(n - m)! n! C m n = k1 = 1: k2 = 1: k3 = 1 n = 7: m = 4 For i = 1 To n k1 = k1 * i Next i For i = 1 To m k2 = k2 * i Next i For i = 1 To n - m k3 = k3 * i Next i s = k1 / k2 / k3 本章目录 * 调用过程: 调用Sprg1 调用Sprg1 调用Sprg2 子过程: Sprg1 子过程: Sprg2 过程的引入: 使同类的操作不重复编写，写一次多次用 把一项复杂的工作分成简单的功能块，分而治之 过程: 完成一段独立功能，可供其他过程使用。 本章目录 * Sub过程 事件过程 自定义子过程 Function过程 内部函数(标准函数） 自定义函数过程 1）过程是一段程序代码，是相对独立的逻辑模块。 2）一个完整的VB应用程序由若干过程和模块组成。 Sub子过程：完成一定的操作和功能，无返回值。 Function函数过程：完成一定的操作和功能，并且可将数据处理的结果返回。 常用过程分类: 本章目录 6.1 函数过程的定义和调用 * 例6.1：已知多边形各条边的长度，计算多边形的面积。 计算多边形面积，可将多边形分解成若干个三角形。计算三角形面积的公式如下：