08 g2 vb ch8 过程与函数.docVIP

第八章 过程与函数 　　1.Sub过程： 　　（1）Sub过程的建立。 　　（2）调用Sub过程。 　　（3）调用过程和事件过程。 　　2.Funtion过程： 　　（1）Funtion过程的定义。 　　（2）调用Funtion过程。 　　3.参数传送： 　　（1）形参与实参。 　　（2）引用。 　　（3）传值。 　　（4）数组参数的传送。 　　4.可选参数和可变参数。 　　5.对象参数： 　　（1）窗体参数。 　　（2）控件参数。 VB应用程序（通常称为工程）的组织结构，由窗体模块、标准模块和类模块组成。VB程序代码就保存在窗体模块文件（＊.Frm）、标准模块文件（＊.Bas）或类模块文件（＊.Cls）中。它们形成了工程的一种模块层次结构，如下图所示。 窗体模块 (文件扩展名为 .FRM ) 窗体模块。窗体模块可以包含处理事件的过程、通用过程以及变量、常数、类型和外部过程的窗体级声明。 在文本编辑器中观察窗体模块，则还会看到窗体及其控件的描述，包括它们的属性设置值。 写入窗体模块的代码是该窗体所属的具体应用程序专用的；它也可以引用该应用程序内的其它窗体或对象。 标准模块 (文件扩展名为．BAS) 它们可以包含变量、常数、类型、外部过程和全局过程的全局(在整个应用程序范围内有效的)声明或模块级声明。写入标准模块的代码不必绑在特定的应用程序上，则在许多不同的应用程序中可以重用标准模块。 类模块 (文件扩展名为 .CLS) 在 Visual Basic 中类模块是面向对象编程的基础。可在类模块中编写代码建立新对象。这些新对象可以包含自定义的属性和方法。实际上，窗体正是这样一种类模块，在其上可安放控件，可显示窗体窗口。 一、Sub过程 1．概念和分类： 在一个应用程序中分解出来的实现某基本功能的独立程序段。众多过程组成有机的整体完成一个具体的任务，就构成了VB应用程序。 分类标准 分类 说明 按定义方法 内部过程 vb系统提供的程序段，根据过程名直接调用。 外部过程 用户根据需要自己编写的程序段。 按是否返回值 子程序过程 调用（执行）后过程名不返回值。 函数过程 调用（执行）后过程名会返回一个结果。 按调用方法 事件过程 发生某个系统事件时，对该事件做出响应（被执行调用）的程序段。是VB的主体。 通用过程 独立于事件过程之外，可供其他事件过程调用的过程。可以存储在窗体模块（只能被该窗体内部事件调用）或标准模块（可以被整个工程中的事件过程调用）中。 2、自定义过程的创建 方法一： Public | Private sub 过程名 (形式参数列表) 语句组 Exit sub 语句组 End sub 过程名和变量名的命名规则相同，过程名长度不超过40个字符； 关于形参的概念下面举例再作讨论； 如【例7.1】page 163 方法二： 打开代码编辑窗口→“工具”→“添加过程”→输入相关内容→“确定” 3、通用过程的调用 方法一： call 过程名 （实际参数列表） 方法二： 过程名 实际参数列表 【例7.2】：（page 164） 二、函数过程（function过程）的创建 1．函数的定义： 方法一： Public function 函数名 （形式参数列表）as 数据类型 语句组 ‘函数名=表达式 Exit function 语句组 函数名=表达式 End function 方法二： 打开代码编辑窗口→“工具”→“添加过程”→输入相关内容→“确定” 2．函数过程（function过程）的调用 变量=函数名（参数1，参数2） 函数名 参数1，参数2 如【例7.3】求阶乘的函数 【例7.4】 例子： 求两个正整数的最大公约数和最小公倍数 最大公约数算法： 以大数a作为被除数，小点的数b作为除数，相除后取余数c； 若c不为零，把b的值给a ，c给b； a与 b继续相除得到新的c，若c仍不为零，则重复此步骤； 最后c=0时的b就是最大公约数； 最小公倍数 最小公倍数=（b*a）/最大公约数=(b/g) * (a/g) 求解公约数： 方法一如例7.5 方法二： Dim m As Integer, n As Integer m = Val(Text1) 将文本框的值赋给变量m n = Val(Text2) If m n Then 这个if语句目的是要保证 mn t = m m = n n = t End If For i = m To 1 Step -1 i从较小的数开始循环，逐个比较 If (n Mod i = 0) And (m Mod i = 0) Then 逐个比较