第06章 模块化程序设计.docVIP

第6章 VB中有两Sub过程一是事件过程，每一个事件过程都对应一个Sub过程。事件过程由系统定义，用户编写代码，当该事件发生后，系统自动调用事件过程另一就是本要过程由定义，代码由用户编写。.2.1 Sub过程的定义 Sub过程的建立有两种方法，第一种方法是通过菜单建立，第二种方法是在代码窗口下直接建立。这里介绍后一种方法。 Sub过程，格式如下： [Static] [Private|Public] Sub 过程名([参数列表]) End Sub 其中： (1) 过程名 命名规则与变量相同。 (2) ([参数列表]) Sub过程的该类参数本身没有值，只代表参数的个数、位置和类型，因此也称为形式参数（简称形参）形参变量（除定长字符型变量外）和数组，不得为常数或表达式用逗号隔开。省略参数列表过程无参过程但过程名后的圆括号不得省略(3) [Private|Public] 用于过程的作用域，[Static]用于确定过程变量为静态变量，将在本章第节中详细介绍。 () 语句组又称为过程体，用来。 如果过程体中含有Exit Sub 语句，表示强行退出过程。.2.2 Sub过程的调用 Sub过程调用格式： Call 过程名（参数列表） 参数列表 其中： (1) 参数列表 代表要传送给Sub过程的称为实际参数（简称实参）常量、变量、数组元素、数组名或表达式。参数之间用逗号分隔。 (2) 在调用Sub过程时，实参和形参按它们的位置建立一一对应关系，实参的值或地址传给对应位置上的形参后，执行过程体，当遇到End Sub或Exit Sub语句时，结束Sub过程，并返回主程序（调用语句所在的程序称为主程序）。 例-1 求组合数的值，设m=6,n=10。 分析：不同数的阶乘次，可以一个Sub过程，供主程序中多次调用。过程个形参，一个用于传入值，另一个用于存放计算结果。程序代码如下： Sub fact(x As Integer, f As Double) Dim i As Integer f = 1 B For i = 1 To x f = f * i Next i End Sub C Private Sub Command1_Click() Dim m As Integer, n As Integer, s As Double, y As Double n = 10: Call fact(n, y) A s = y D m = 6: Call fact(m, y) E s = s / y F Call fact(n - m, y) G s = s / y H Print CMN= s End Sub 为了便于描述程序的运行过程，程序中注释字符用于标记程序执行的位置。 程序执行过程描述如下： （1）单击窗体Command1），程序运行Command1_Click事件，声明变量后，变量获得初值为0。 2）程序运行到A处，调用fact过程，通过参数传递将传给过程形参使得与f共用同一，在过程中对形参的操作也就是对实参的操作。3）程序运行到B处,f获得值为1，开始进行阶乘运算4）程序运行到C处，f中保存的就是n（本次n=）的阶乘值，返回主程序D处5）程序运行到D处，此的就是！，到变量s中6）程序运行到E处，再次调用fact过程，将传给过程形参 （7）程序再次运行到B处，f原来的值被1取代，开始进行的阶乘运算。 8）程序运行到F处，将！变量s中。 9）程序运行到G处，第三次调用fact过程，计算！。 10）程序运行到H处，将！变量s中，最后输出结果。 Sub过程的定义、调用方法、程序执行流程，到底过程调用时实参与形参之间的数据传递是如何完成的，学习了下节就一目了然了。 6.2.3 过程调用中的参数传 1．传地址方式 VB默认的参数传递方式。在这种方式下，实参地址，形参与实参共一存储单元，因此在过程中对形参的任何操作对相应实参的操作。 利用传地址方式获得过程处理结果ByRef