Vb程序设计教程 函数与子过程.pptVIP

函数与子过程 函数定义与使用复习 参数说明 函数调用举例 函数中的特殊语句 函数设计举例 子过程 子过程的定义及使用 子过程举例 变量作用域 变量的用法 * 函数定义： Function 函数名(参数) [ as 类型] ……（函数体） End Function 参数定义： [ByVal | ByRef] 变量名 [as 类型] 可无参数，亦可多个，多个参数间用逗号,分隔 传值(ByVal)：单向传递，即由主程序将实际参数值传递给函数，函数中对参数的修改与主程序的实际参数无关。 引用(ByRef，或无任何修饰)：双向传递，即执行时，将主程序的实参值传递给函数，于函数中修改参数将影响到实际参数。 实际参数：调用函中使用的表达式做为参数，则称为实际参数。只有实际参数为变量名时，“引用”将起作用。 求弧度为x的sin函数值 sin(x) x为实际参数 sin(x+y) x+y为实际参数 已知有函数定义如下： Function maxComFactor(x,y) dim I : i=x while x mod i0 or y mod I 0 i=i-1 wend maxComFactor=I End Function 1、函数名=表达式 功能：准备将“表达式”的值做为函数值返回给函数调用者。即函数名是有“值”的，其“值”就是函数返回值。 2、Exit Function 功能：函数执行完毕，返回给调用者。End Function语句隐含着该语句。 3、函数中定义变量：称为局部变量，仅在函数体内有效，可以使用。 1、编写一个函数，求一数组中最大值所在的位置。 Function MaxPos(a() ) as integer max=LBound(a) dim I% i=max+1 while i=UBound(a) if a(i)a(max) then max=I wend MaxPos=max End Function 与函数没有本质区别，不同的是：函数有且仅有一个“函数值”需要返回给主程序，而子过程无值返回给主程序。即子过程可以认为是一个操作。 注：1）无论是函数，还是子过程皆可以通过“引用”参数实现主程序与子程序间传递多个数据；2）函数只能出现在表达式中，而过程只能独立使用，不得出现在表达式中。 Sub 过程名（参数表） ……（过程体） End Sub 注：语句 Exit Sub 的功能为退出子过程，返回到主程序 语句 [Call] 过程 实参表 的功能是调用子过程。 编写一个子过程，将一个数组的元素按照由小到大的顺序排列。 Sub Sort( a()) dim max,I,j,t for i=LBound(a) to UBound(a) max=I for j=i+1 to UBound(a) if a(j)maxPos then max=j …… End Sub 局部变量：定义在函数或过程体内，使用Dim或static定义的变量． 模块级变量：使用Private、Dim关键字修饰的在Form之通用声明段中定义的变量或标准模块(module)声明的变量。 全局变量：亦称公共的模块级变量，是用Public修饰的变量。 *