ch4(函数和过程).ppt

第三章回顾;主要介绍： 函数过程(Function) 子过程(SUB过程) 参数传递规则 多模块程序设计（变量作用域）;简单例题;程序如下：; VB系统函数(标准函数或内部函数)： 三角函数(sin/cos/tan)、指数函数(exp)、对数函数(log) 平方根函数(sqr)、绝对值函数(ABS)、符号函数(sgn) 字串函数(left,mid,right,trim,Ltrim,Rtrim,Len,space等) 日期函数(date,time,now,minute,second,hour,year等) 随机函数(Rnd/Randomize)、print函数、tab函数等等;例题4.1;4.1 过程的编写与调用;例如4.1中求平方根的自定义函数过程：;（1）函数名：命名规则与变量名规则相同。但不能与系统的内部函数或其它通用子过程同名，也不能与已定义的全局变量和本模块中模块级变量同名。 （2）在函数体内，函数名可以当变量使用，函数的返回值就是通过对函数名的赋值语句来实现的，在函数过程中至少要对函数名赋值一次——也即是一定要有返回值，否则出错。 （3）AS类型：是指函数返回值的类型，若省略，则函数返回变体类型值（Variant）。 （4） 定义为Private的任何过程，只能被其所在窗体的过程调用, 调用格式为 函数名(实参列表);定义为Public（缺省属性）的任何过程，可以被当前工程中其它窗体中的过程调用, 调用格式为 窗体名.函数名(实参列表) ;（5）形式参数声明列表：形式参数通常简称“形参”，仅表示形参的类型、个数、位置，定义时是无值的，只有在过程被调用时，虚实参结合后才获得相应的值。 （6）过程可以无形式参数，但括号不能省。 （7）形参的声明形式： [ByVal｜ByRef]变量名[( )][As 类型][,…]， ByVal表示当该过程被调用时，参数是按值传递的；缺省或ByRef表示当该过程被调用时，参数是按地址传递的。 （8）Exit Function：表示退出函数过程，常常是与选择结构（If或Select Case语句）联用，即当满足一定条件时，退出函数过程。;函数过程调用的标准格式：;例题4－3（P86);第四章回顾;例题4－1（P84）;;Private Function fact(ByVal k As integer) As Long fact=1 For i% = 2 To k fact = fact * i% Next i% End Function ;Private Sub Form_click() Dim zh As Long ,i as integer,j as integer For i = 0 To 9 For j = 0 To i zh = fact(i)/fact(j)/fact(i-j) Print Space(5 - Len(Str(zh))); Print Str(zh); Next j Print Next i End Sub;知识点：;数组作为参数传递： 调用（实参）： 函数名（数组名，数组大小） 编写（形参）： 函数名（数组名加括号，数组大小）;例题4.2;例题4-5（P88）;3、确定形参（自变量）的个数、类型和传递方式。;SUB 过程的编写; 1 子过程的调用 (SUB) 子过程名 [实参列表] (调用事件可以不用call） 或 Call 子过程名(实参列表) 2 函数过程的调用 (FUNCTION) 变量名 = 函数过程名([实参列表]) 说明： (1)参数列表称为实参或实元，它必须与形参保持个数相同，位置与类型一一对应。 (2)调用时把实参值传递给对应的形参。其中值传递（形参前有ByVal说明）时实参的值不随形参的值变化而改变。而地址传递时实参的值随形参值的改变而改变。;例题4－7（P89）;例题4－6（P89）;例题4－4（P87）;4.2 参数传递; 例题4.0;按值传递的参数类型要求：形参是实参的一个副本;2、实参为字符类型，形参为数值类型 以实参字符的数字赋值给形参，即： 实参 形参 结果 字符“28” 数值 A A＝28 字符“28