下载掌阅APP，畅读海量书库
立即打开
6.1VB的过程设计及子过程（Sub）的定义与调用
1．什么是过程
在程序设计中，为各个相对独立的功能模块所编写的一段程序称之为过程。
2．VB中的自定义过程分类
（1）以“Sub”保留字开始的子程序过程（包括事件过程和通用过程），不返回值；
（2）以“Function”保留字开始的函数过程，返回一个值；
（3）以“Property”保留字开始的属性过程，可以返回和设置窗体、标准模块以及类模块的属性值，也可以设置对象的值。
3．事件过程
（1）窗体事件过程
语法：Private.SubForm_事件名（[参数列表]）
[局部变量和常数声明]
语句块
EndSub
注意：
1）窗体事件过程名由Form_事件名组成，多文档窗体用MDIForm_事件名；
2）每个窗体事件过程名前都有一个Private的前缀，表示该事件过程不能在它自己的窗体模块之外被调用；
3）事件过程有无参数，完全由VB提供的具体事件本身决定，用户不可以随意添加。
（2）控件事件过程
语法：Private.Sub控件名_事件名（[参数列表]）
[局部变量和常数声明]
语句块
EndSub
注意：其中的控件名必须与窗体中某控件相匹配，否则VB将认为它是一个通用过程。
（3）建立事件过程的方法
1）打开代码编辑器窗口（两种方法：双击对象或从工程管理器中单击“查看代码”按钮）
2）在代码编辑器窗口中，选择所需要的“对象”和“事件过程”
3）在PrivateSub……EndSub之间键入代码
4）保存工程和窗体
（4）事件过程的调用
事件过程由一个发生在VB中的事件来自动调用或者由同一模块中的其他过程显示调用。
2．通用过程
通用过程是一个必须从另一个过程显示调用的程序段，通用过程有助于将复杂的应用程序分解成多个易于管理的逻辑单元，使应用程序更简洁、更易于维护。
通用过程分为公有（Public）过程和私有（Private）过程两种，公有过程可以被应用程序中的任一过程调用，而私有过程只能被同一模块中的过程调用。
（1）定义方法：
[Private|Public].[Static].Sub过程名（[参数列表]）
[局部变量和常数声明].‘用Dim或Static声明
语句块
[ExitSub]
语句块
EndSub
注意：
1）缺省[Private|Public]时，系统默认为Public；
2）Static表示过程中的局部变量为“静态”变量；
3）过程名的命名规则与变量命名规则相同，在同一个模块中，同一符号名不得既用作Sub过程名，又用作Function过程名。
4）参数列表中的参数称为形式参数，它可以是变量名或数组名，只能是简单变量，不能是常量、数组元素、表达式；若有多个参数时，各参数之间用逗号分隔，形参没有具体的值。VB的过程可以没有参数，但一对圆括号不可以省略。不含参数的过程称为无参过程。
形参格式为：
[ByVal]变量名[（）][As.数据类型]
式中：
变量名[（）]：变量名为合法的VB变量名或数组名，无括号表示变量，有括号表示数组。
ByVal：表明其后的形参是按值传递参数（传值参数PassedByValue），若缺省或用ByRef，则表明参数是按地址传递的（传址参数）或称“引用”（PassedByReference）。
As：.数据类型：缺省表明该形参是变体型变量，若形参变量的类型声明为String，则只能是不定长的。而在调用该过程时，对应的实在参数可以是定长的字符串或字符串数组，若形参是数组则无限制。
5）Sub过程不能嵌套定义，但可以嵌套调用。
6）.EndSub标志该过程的结束，系统返回并调用该过程语句的下一条语句。
7）过程中可以用ExitSub提前结束过程，并返回到下调用该过程语句的下一条语句。
（2）建立Sub过程的方法
方法一：
1）打开代码编辑器窗口
2）选择“工具”菜单中的“添加过程”
3）从对话框中输入过程名，并选择类型和范围
4）在新创建的过程中输入内容
方法二：
1）在代码编辑器窗口的对象中选择“通用”，在文本编辑区输入PrivateSub过程名
2）按回车键，即可创建一个Sub过程样板
3）在新创建的过程中输入内容
3．Sub子过程的调用
（1）用Call语句调用Sub过程
语法：Call过程名（实在参数表）
实在参数的个数、类型和顺序，应该与被调用过程的形式参数相匹配，有多个参数时，用逗号分隔。
（2）把过程名作为一个语句来用
语法：过程名[实参1[，实参2……]]
它与（1）的不同点是：去掉了关键字和实参列表的括号
如上例中可以改成：areaa,b,c,w
6.3参数的传递
1．形参与实参的概念
形参：指出现在Sub和Function过程形参表中的变量名、数组名，过程被调用前，没有分配内存，其作用是说明自变量的类型和形态以及在过程中的角色。形参可以是：
1）除定长字符串变量之外的合法变量名；
2）后面跟（）括号的数组名。
实参：是在调用Sub和Function过程时，传送给相应过程的变量名、数组名、常数或表达式。在过程调用传递参数时，形参与实参是按位置结合的，形参表和实参表中对应的变量名可以不必相同，但位置必须对应起来。
形参与实参的关系：形参如同公式中的符号，实参就是符号具体的值；调用过程：即实现形参与实参的结合，也就是把值代入公式进行计算。
2．按值传递参数（定义时加ByVal）
按值传递参数（PassedByValue）时，是将实参变量的值复制一个到临时存储单元中，如果在调用过程中改变了形参的值，不会影响实参变量本身，即实参变量保持调用前的值不变。
3．按地址传递参数（定义时没有修饰词或带关键字ByRef）
按地址传递参数时，把实参变量的地址传送给被调用过程，形参和实参共用内存的同一地址。在被调用过程中，形参的值一旦改变，相应实参的值也跟着改变。如果实参是一个常数或表达式，VB会按“传值”方式来处理。
4．数组参数
VB允许把数组作为形参出现在形参表中，语法：形参数组名（）[As数据类型]
形参数组只能按地址传递参数，对应的实参也必须是数组，且数据类型相同。调用过程时，把要传递的数组名放在实参表中，数组名后面不跟圆括号。在过程中不可以用Dim语句对形参数组进行声明，否则会产生“重复声明”的错误。但在使用动态数组时，可以用ReDim语句改变形参数组的维界，重新定义数组的大小。
5．对象参数
VB中可以向过程传递对象，在形参表中，把形参变量的类型声明为“Control”，可以向过程传递控件；若声明为“Form”，则可向过程传递窗体。对象的传递只能按地址传递。
6.4变量、过程的作用域
1．VB应用程序的组成：
2．过程的作用域
3. 变量的作用域
4．静态变量
用Static声明的静态变量，在每次调用过程时保持原来的值，不重新初始化。而用Dim声明的变量，每次调用过程时，重新初始化
例：显示1到5个数。
5．同名变量
对不同范围内出现的同名变量，可以用模块名加以区别。一般情况下，当变量名相同而作用域不同时，优先访问局限性大的变量。
6.5递归过程
1．递归的概念
通俗的讲，用自身的结构来描述自身就称为“递归”。如对阶乘运算的定义就是递归的：
n!=n(n-1)!.(n-1)!=(n-1)(n-2)!
2．递归子过程和递归函数
VB允许一个自定义子过程或函数过程在过程体的内部调用自己，这样的子过程或函数就叫递归子过程和递归函数。递归过程包含了递推和回归两个过程。构成递归的条件是：
（1）递归结束条件和结束时的值
（2）能用递归形式表示，并且递归向结束条件发展。
例：编制程序求fac（n）=n！的函数
3．注意事项
（1）递归算法设计简单，但消耗的上机时间和占据的内存空间比非递归大
（2）设计一个正确的递归过程或函数过程必须具备两点：
1）具备递归条件；
2）具备递归结束条件
（3）一般而言，递归函数过程对于计算阶乘、级数、指数运算有特殊效果。