过程与函数

☆☆ 第6章 过程与函数
12
6.3 Function过程
6.3.2 函数的调用
调用形式如下： 函数名（实参列表）
说明： 在调用时实参和形参的数据类型、顺序、个数必须
匹配。函数调用只能出现在表达式中，其功能是求得函 数的返回值。
例6.3
☆☆ 第6章 过程与函数
13
6.4 过程之间参数的传递
Visual Basic中不同模块（过程）之间数据的传递有两种方式： ➢ 通过过程调用实参与形参的结合实现； ➢使用全局变量来实现各过程中共享数据。
End Sub
Sub Swap2(x%, y%) Dim Temp% Temp = x: x = y: y = Temp
End Sub
Private Sub CmdOK_Click()
Dim a%,b%
a = 10: b = 20
Swap1 a, b
‘传 值
Print "A1="; a, "B1="; b
6.4.1 形式参数与实际参数
1、形式参数
是指在定义通用过程时，出现在Sub或Function语句中的 变量名后面园括号内的数，是用来接收传送给子过程的数据， 形参表中的各个变量之间用逗号分隔。
☆☆ 第6章 过程与函数
14
6.4 过程之间参数的传递
2、实际参数 实际参数是指在调用Sub或Function过程时，写入子过程
例6.6 分别编写计算下面级数的子过程和函数过程，并在
窗体的单击事件中调用。
级数为，
s x x3 ..... x (2n1)
2! 4!
(2n)!
要求精度为：
x n 106 (2n)!
☆☆ 第6章 过程与函数
21
6.4.4 数组作过程的参数
Visual Basic允许把数组作为实参传送到过程中。数组作 参数是通过传地址方式传送。在传送数组时，除遵守参数传 送的一般规则外，还应注意以下几点：
☆☆ 第6章 过程与函数
23
6.4.4 数组作过程的参数
调用时形参数组a和实参数组b虚实结合，共用一段内存单 元，如图6-7所示。因此在Sort()过程中改变数组a的各元素值， 也就相当于改变了实参数组b中对应的元素的值，当调用结束 时，形参数组a成为无定义。
b(1) b(2) b(3) b(4) b(5) b(6) b(7) b(8)
☆☆ 第6章 过程与函数
6
6.2 Sub过程
6.2.3 子过程的建立
通过 “工具”菜单中的“添加过程”命令，出现“添加 过程”对话框（见图6.1），选择过程类型（子过程、函数、 属性、事件）及作用范围（公有的Public、私有的Private）， 单击确定后得到一个过程或函数定义的结构框架（模板）， 如：
a(1) a(2) a(3) a(4) a(5) a(6) a(7) a(8) 参数为数组时虚实结合示意图
例6.7 改写上章例5.3的排序程序，分别将排序用子过程 Sort()，产生N个随机整数用子过程GetData()，输入N个数组 元素用PrData()子过程来完成。
☆☆ 第6章 过程与函数
24
3．当用数组作形参时，对应的实参必须也是数组，且类 型一致。
4．实参和形参结合是按地址传递，即形参数组和实参数 组共用一段内存单元。
例如：定义了实参数组b(1 to 8)，给它们赋了值，调用 Sort()函数过程的形式如下：
Sort b( ) 或 Call Sort( b() ) 实参数组后面的括号可以省略，但为便于阅读，建议一 般不要省略为好。
☆☆ 第6章 过程与函数
15
6.4 过程之间参数的传递
传址与传值
传址： 形参得到的是实参的地址，当形参值的改变同时 也改变实参的值。
传值： 形参得到的是实参的值，形参值的改变不会影响 实参的值。
例6.4
Sub Swap1(ByVal x%, ByVal y%) Dim Temp% Temp = x: x = y: y = Temp
<局部变量或常数定义>
<语句块>
[函数名=返回值] [Exit Function]
函数体
<语句块>
[函数名=返回值]
End Function
☆☆ 第6章 过程与函数
11
6.3 Function过程
说明：
（1）函数名：命名规则与变量名规则相同。 （2）在函数体内，函数名可以当变量使用，函数的返回值就 是通过对函数名的赋值语句来实现的，在函数过程中至少要对 函数名赋值一次。 （3）AS类型：是指函数返回值的类型，若省略，则函数返回 变体类型值（Variant）。 （4）Exit Function：表示退出函数过程，常常是与选择结构 （If或Select Case语句）联用，即当满足一定条件时，退出函 数过程。 （5）形参数列表：形参的定义与子过程完全相同。 例6.2
第6章 过b子程序和Function函数过程的定义和调用方法； ➢ 掌握传址和传值两种参数传递方式的区别及其用途； ➢ 熟悉数组参数的使用方法； ➢ 了解过程的嵌套调用和递归调用的执行过程； ➢ 掌握过程作用域的有关概念；掌握变量的作用域和生存期。
本章重点：➢ Sub过程及Function过程的定义与调用。
Public Sub Sort( )
……
End Sub
☆☆ 第6章 过程与函数
7
6.2 Sub过程
6.2.4 过程的调用
1、子过程的调用 子过程名 [参数列表]
或 Call 子过程名(参数列表) 说明：
（1）参数列表称为实参或实元，它必须与形参保持个数 相同，位置与类型一一对应。
（2）调用时把实参值传递给对应的形参。其中值传递 （形参前有ByVal说明）时实参的值不随形参的值变化而改变。 而地址传递时实参的值随形参值的改变而改变。
6.5 过程的嵌套和递归调用
6.5.1 过程的嵌套
在程序中调用一子过程，而在子过程中又调用另外的子 过程，这种程序结构称为过程的嵌套。过程的嵌套调用执行 过程如下图：
End Sub
Sub Swap2(x%, y%) Dim Temp% Temp = x: x = y: y = Temp
End Sub
☆☆ 第6章 过程与函数
16
6.4 过程之间参数的传递
Sub Swap1(ByVal x%, ByVal y%) Dim Temp% Temp = x: x = y: y = Temp
名或函数名后括号内的参数，其作用是将它们的数据（数值或 地址）传送给Sub或Function过程与其对应的形参变量。
实参可由常量、表达式、有效的变量名、数组名（后加左、 右括号，如A( )）组成，实参表中各参数用逗号分隔。
6.4.2 参数传递（虚实结合）
参数传递指主调过程的实参（调用时已有确定值和内存 地址的参数）传递给被调过程的形参，参数的传递有两种方 式：按值传递、按地址传递。形参前加“ByVal”关键字的是 按值传递，缺省或加“ByRef”关键字的为按地址传递。
☆☆ 第6章 过程与函数
9
6.2 Sub过程
过程调用的执行过程：
Private Sub CmdOK() …… Call Swap(a,b) …… Swap a,b
End Sub
☆☆ 第6章 过程与函数
Private Sub Swap(x%,y%) Dim temp%
Temp=X X=Y Y=Temp End Sub
a = 10: b = 20
Swap2 a, b
'传地址
Print "A2="; a, "B2="; b
End Sub
☆☆ 第6章 过程与函数
17
6.4 过程之间参数的传递
值传递的执行过程如下图：
☆☆ 第6章 过程与函数
18
6.4 过程之间参数的传递
通过地址传递数据的执行过程
☆☆ 第6章 过程与函数
☆☆ 第6章 过程与函数
2
6.2 Sub过程
在VB中，的Sub子过程分为：事件过程和通用过程 6.2.1 事件过程
（1）窗体事件的语法 Private Sub Form_事件名(参数列表)
＜语句组＞ End Sub
（2）控件事件的语法 Private Sub 控件名_事件名(参数列表)
＜语句组＞
End Sub
如果形参定义是按传地址方式，但调用时想使实参变量 按值方式传递，可以把实参变量加上括号，将其转换成表达 式即可。
例6.5 参数的传递问题：
☆☆ 第6章 过程与函数
20
6.4.3 有关过程之间数据传递的几点说明
4．使用子过程还是使用函数过程
解决一个问题既可以使用子过程，也可以使用函数过程， 是使用子过程还是使用函数过程呢？如果是需要求得一个值， 一般情况使用函数过程，如不是为了求一个值，而是完成一些 操作，或需要返回多个值，则使用子过程比较方便。
1．为了把一个数组的全部元素传送给一个过程，应将数 组名分别写入形参表中，并略去数组的上下界，但括号不能 省略。
Private Sub Sort(a() As single) ……
End Sub 其中形参“a( )”即为数组。
☆☆ 第6章 过程与函数
22
6.4.4 数组作过程的参数
2．被调过程可通过Lbound和Ubound函数确定实参数组 的上、下界。
子过程名不返回值，而是通过形参与实参的传递得到结果， 调用时可返回多个值。
☆☆ 第6章 过程与函数
4
6.2 Sub过程
（2）形式参数列表：形式参数通常简称“形参”，仅表示 形参的类型、个数、位置，定义时是无值的，只有在过程被 调用时，虚实参结合后才获得相应的值。 （3）过程可以无形式参数，但括号不能省。 （4）参数的定义形式：