VB程序计-第7章.pptVIP

VB程序设计 第七章 过程 第七章 过程 本章知识点： 内容主要包括VB过程的定义及其应用，包括：Sub过程、Function过程的定义、过程参数传递、过程的嵌套和递归调用以及变量的作用范围和生存期等。 第七章 过程 7.1 Sub过程 7.2 Function过程 7.3 过程的调用 7.4 过程中的参数传递 7.5 过程的嵌套和递归调用 7.6 变量的作用范围和生存期 第七章 过程 7.1 Visual Basic语言简介 VB有两种Sub过程：事件过程和通用（sub）过程。 1）事件过程 事件是指能被VB对象（窗体和控件）识别的动作，例如单击(Click)按钮,双击(DbClick)窗体等，为事件所编写的程序代码称为事件过程。 事件过程分为控件事件过程和窗体事件过程。 （1）控件事件过程 第七章 过程 控件事件过程是将控件的实际名称(在控件的name属性中指定)、下划线、事件名以及相关的程序代码组合起来。例如在Form窗体中有一个名为Cmd的命令按钮，希望单击该按钮后，在窗体中打印Cmd按钮的名字，需要使用按钮的cmd_Click()事件过程，相关程序代码如下： Private Sub cmd_Click() Print cmd.Name End Sub 第七章 过程 （2）窗体事件过程 窗体事件过程是将“Form”、下划线、事件名以及相关的程序代码组合起来。例如希望单击窗体后弹出对话框显示窗体的标题，需要使用窗体的Form_DblClick()事件过程，相关程序代码如下： Private Sub Form_DblClick() MsgBox form1.Caption End Sub 第七章 过程 2） 通用（sub）过程 通用过程的定义语句如下： [Private][Public][Static]Sub 过程名 （[形式参数表及其说明]） 过程的操作对象（数据）定义和说明部分 语句块1 [Exit Sub] 语句块2 End Sub 第七章 过程 其中： （1）Private表示过程是局部的、私有的，只能在本模块中使用；Public表示过程是全局的、公有的，可以被程序中任何模块使用，系统缺省为Public。 （2）Static表示该过程内部定义的变量为局部静态变量。 （3）过程名的命名规则和变量的命名规则相同。 （4）Exit Sub语句使过程立即从该语句处退出。 （5）End Sub用来结束本Sub过程。 （6）形式参数表及其说明，Sub过程的形式参数表用圆括号括起来的、由零个到多个形式参数的定义组成，两个形式参数定义之间用逗号分隔。若一个Sub过程没有形式参数，作为Sub过程运算符使用的圆括号也不能省略。 第七章 过程 形式参数表的语法形式如下： [ByVal][ByRef]变量名 [AS 数据类型] 其中：ByVal表示参数按值传递，ByRef表示参数按地址传递，数据类型用来表示传递给该过程的参数的数据类型，缺省为Variant类型。 第七章 过程 7.2 Function过程 Function过程的定义语句如下： [Private][Public][Static] Function 函数名([形式参数表及其说明]) [As 数据类型] 语句块 ［函数名＝表达式］ ［Exit Function］ End Function 第七章 过程 其中： （1）Private表示过程是局部的、私有的，只能在本模块中使用；Public表示过程是全局的、公有的，可以被程序中任何模块使用，系统缺省为Public。 （2）Static表示局部静态变量，是指在调用该过程结束后仍保留Function过程的变量值。 （3）Function过程名的命名规则和变量的命名规则相同。 （4）Exit Function语句使过程立即从该语句处退出。 （5）End Function用来结束本Function过程。 （6）形式参数表及其说明同通用过程。 （7）函数名是有值的，所以在函数体内至少要通过函数名＝表达式对函数名进行赋值一次。 第七章 过程 下面以定义实现求阶乘功能函数过程为例了解一个函数过程的具体定义过程。根据前面所学知识知道，通过Inputbox函数输入一个正整数n后求n的阶乘的VB程序代码如下所示： Private Sub Command1_Click() Dim fac!, i%, n% fac = 1 n = Val(InputBox(请输入一个正整数, 输入)) For i = 1 To n fac = fac * i Next i Print n 的阶乘是： fac End Sub 第七章 过程 用函数实现阶乘功能的具体过程如