VB程序设计 过程和函数.ppt

VB程序设计 唐四薪 第6章 过程与函数 本节课要求 1 . 掌握Sub过程、Function函数的定义和调用 2. 理解Sub过程和Function函数的区别 3. 掌握编写过程和函数的一般流程 引入过程和函数的目的 1.依据结构化程序设计的思想，实现模块化的程序设计 当需解决的问题规模较大、复杂时,可以按功能细分成一个一个小的功能模块,这样的小程序段，在VB中被称为过程; 2. 简化程序中多处重复出现处理相同功能的程序段的设计问题 过程的定义：过程是一段能完成一个或多个特定功能的独立的程序段，并可以被其他过程调用 特点：功能独立；可被调用 过程和函数 在VB中，过程有两种，一种是Sub子过程，一种是Function函数。 两者的区别在于： Sub子过程只执行程序而不返回值， 而Function函数执行程序后会返回值。 函数Function和过程Sub的区别 打爆米花 建立函数的一般过程 Function 函数名（[形式参数1，形式参数2，…]） …… End Function 输入：？ 输出：？ Function 打爆米花（粮食，糖精） …… 打爆米花=爆米花 End Function 6.1.1 子过程的定义 子过程的定义 Sub sub1 (a as long, b as long) c = a+b print c End Sub 形式参数列表由若干个形式参数构成，参数之间用逗号分隔。每个形式参数按下列格式定义:： 形式参数名 [As 类型名] 省略类型说明则表示是Variant类型。 子过程中可以使用Exit Sub语句跳出子过程。 6.1.2 子过程的调用 6.1.2 通用子过程 7）End Sub标志Sub过程执行结束，程序将返回调用该Sub过程的语句处继续执行； 8）过程不能嵌套定义。 Private Sub Command1_Click() …… Call P() …… End Sub 事件过程 事件过程的调用：当有事件发生时，系统会自动调用与事件相对应的事件过程。事件过程是与对象相关联的，是对象对事件做出的响应。事件过程的名称由对象名、下划线、事件名连接而成。 Sub过程（子程序） Sub子程序的语法如下： Sub 子程序名（[形式参数1，形式参数2，…]） …… End Sub 调用子程序的两种方式： （1）Call 子程序名（[实际参数1，实际参数2，…]） （2）子程序名 [实际参数1，实际参数2，…] Function函数 Function函数的语法如下： Function 函数名（[形式参数1，形式参数2，…]） …… End Function 调用函数 变量= Function 函数名（参数1，参数2，…） 函数可以向变量一样引用和参与运算 6.2 定义Function过程 定义Function过程说明： 1）Function过程以Function语句开头，以End Function结束；中间代码部分为函数体； 2）函数名有返回值，其值类型由As 数据类型指定； 3）函数体内一般都会至少为函数名赋值一次；如果不赋值，函数返回值默认为0或空； 4）函数中途可以利用Exit Function退出。 Function函数返回值的方式 与Sub过程不同的是，Function函数通过函数名返回一个值，这个值是在过程的语句中赋给函数名的。 Function mySquare(intA,intB) ‘intA和intB是形式参数 Dim lngSum lngSum=intA^2+intB^2  mySquare=lngSum End Function 6.2.2 函数的调用 6.2 定义Function过程 例如，求n! Private Function fac%(n As Integer) If n0 Then fac = -1:Exit Function Else fac = 1 For i = 1 To n fac = fac*i Next i End If End Function 6.2 定义Function过程 例如，求m, n的最大公约数Private Function gcd%(ByVal m%,ByVal n%) Dim r%,t% If mn Then Call Change(m, n) r = m Mod n Do While r0 m = n n = r r = m Mod n Loop gcd = n End Function 过程和函数需注意的几点 过程的定义不可以嵌套 函数和过程必须先定义才能使用 使用自定义