VB语言程序设计2012(第四部分)学习课件.pptVIP

第四章 VisualBasic 程序设计 过程 过程调用 参数传递 Sub Main过程与快速启动窗体 程序举例 * * 4.1 过程： 过程：将复杂的程序分割成的较小的逻辑部件。每个过程编写一段程序。一个过程可以被另一个过程调用 VB的过程：子程序过程（Sub Procedure）、函数过程(Function Procedure)、属性过程(Property Procedure) 一、Sub过程：无返回值 可以放在窗体模块或标准模块中。有两种类型： 事件过程和普通过程。语法： [Private|Public][Static] Sub 过程名([参数列表]) [局部变量和常量声明] 语句组 End Sub 1.事件过程：对象的某个事件发生时执行的代码 分类：窗体事件过程和控件事件过程。 事件过程前面的声明都是Private 窗体事件过程的定义均为： Private Sub Form_事件名([参数列表]) End Sub MDI窗体的事件过程名为： MDIForm_事件名 控件事件过程名的定义： Private Sub 控件名_事件名([参数列表]) End Sub 建立事件过程： 双击控件/窗体，进入代码编辑窗口在事件列表中选事件 点击“工程资源管理器/察看代码”，进入代码编辑窗口在对象列表中选对象后，在事件列表中选事件。 2.通用过程：C中的子程序 可以保存在两种模块中：窗体模块（frm）和标准模块(bas)中 (1)定义 语法： [Private|Public][Static] Sub 过程名([参数列表]) [局部变量和常量声明] [Exit sub] 语句组 End Sub Private|Public，默认Public Static：局部静态变量，在调用结束后仍保留sub过程中的变量值 局部变量和常量声明：过程内部用到的变量和常量 Exit sub：结束本过程的执行，返回到调用者过程，执行调用语句的下一条语句。 sub过程不能嵌套定义，但可以嵌套调用 参数列表：形式参数，接受从调用者处传来的参数 语法：[ByVal|ByRef] 变量名[（）] As 数据类型] ByVal：该参数按值传递 ByRef：该参数按地址传递 （2）通用过程的建立 方法一： 打开“代码编辑器” 工具/添加过程 在添加过程对话框输入过程名 单击“确定”按钮 方法一： 打开“代码编辑器” 对象列表框中的“通用” 输入：Public Sub AAA() “回车” 二、Function过程：有返回值 语法： [Private|Public][Static] Function 函数名([参数列表]) [As 数据类型] [局部变量和常量声明] [函数名=表达式] [Exit Function] 语句组 [函数名=表达式] End Function 4.2 过程的调用： 一、调用Sub事件过程 两种调用方法： 发生的事件自动调用 在其他过程中用于据调用，语法： Call 过程名[(参数列表)]或过程名[(参数列表) 参数列表：实参 Private Sub Command1_Click() Text1.Text = Hello End Sub Private Sub Form_DblClick() Call Command1_Click End Sub 二、调用Sub通用过程 在其他过程中用于据调用，语法： Call 过程名[(参数列表)]或过程名[(参数列表) Private Sub Form_Click() Call aaa End Sub Public Sub aaa() Print Hello End Sub 三、调用Function过程 语法： Function 函数名（[参数列表]） 或 Call 函数名（[参数列表]） 或 函数名（[参数列表]） 说明：无参数时，（）不能省略 调用方法同系统内部函数 例：用辗转相除法求最大公约数 Public Function Divisor(ByVal x As Integer, ByVal y As Integer) 计算x，y的最大公约数 Dim r As Integer r = x Mod y Do While r 0 x = y y = r r = x Mod y Loop Divisor = y End Function Private Sub Form_Click() Dim a, b, c As Integer a = InputBox(please input a) b = Inpu