VB过程和参数传递.ppt

VB程序设计教程 沈美莉 马银晓 陈孟建 编著 第七章 过程 一、 Sub过程 二、 Function过程 三、参数的传递 四、可变参数与对象参数 第一节 Sub过程 过程实际上就是其他语言中的子程序，子程序是一个相对独立的应用程序，它可以被其他程序所调用，当然，它也能够调用其他的子程序。在Visual Basic语言中提供了两类过程，一类是子程序过程，又称为Sub过程，另一类是函数过程，又称为Function过程。 一、创建Sub过程 1．定义Sub过程 格式： [static][private][public] sub 过程名[（参数表列）] 语句组 [Exit sub] [语句组] End sub 第一节 Sub过程 2．注意事项 （1）sub过程以sub开始，以End sub结束。 （2）参数static指的是在过程中的变量为static型。 （3）private指的是过程是私有过程，只能被本模块中的其他过程访问。 （4）public指的是过程是公有过程，可以在程序的任何地方调用它。 （5）过程名指的是过程的一个名称，是一个长度不超过255字符的变量名。 （6）参数表列指的是，调用时传递给过程的参数的类型和个数，每个参数的格式为： [By Val] 变量名 [（）][As 数据类型] （7）Sub过程不能嵌套，也就是说，在sub过程内，不能定义sub过程或function过程；也不能用gosub、goto或return语句进入或退出一个sub过程，只能通过调用执行sub过程。 第一节 Sub过程 3．建立sub过程的方法 （1）方法一 ① 双击窗体打开代码设计窗口，或利用“添加模块”功能，打开模块代码窗口。 ② 单击“工具”模块下的“添加过程”功能，系统弹出如下图所示的“添加过程”对话框。 第一节 Sub过程 ③ 在图中的名称文本框中输入过程名称为：ppa。 ④ 在“类型”选项中选择“子程序”单选框。 ⑤ 在“范围”选项中选择“公有的”单选框。 ⑥ 单击“确定”按钮即可建立一个Sub过程，用户可以在Sub ppa与End Sub之间增添程序代码了。 （2）方法二 ① 单击“工程”模块下的“添加模块”功能。 ② 打开模块代码窗口，并键入过程的名字。例如：键入：sub ppa(),并按回车键，即可建立一个Sub过程，如下图所示。 第一节 Sub过程 二、调用sub过程 调用Sub过程有两种方法，一种方法是使用Call调用过程语句来调用过程，另一种方法是将过程名作为一个语句来使用。 1．用call调用语句 （1）格式 Call 过程名 [（实参表）] （2）功能 Call语句把程序控制传递到一个Visual Basic语言的Sub过程。Call语句调用一个过程时，如果过程本身没有参数，则实参表和括号可以省略；否则，应给出相应的实际参数，并把参数放在括号中。实际参数是传递给sub过程的变量或常数的。 例如： Call ppa(a,b) 第一节 Sub过程 2．把过程作为一个语句来使用 在调用sub?过程时，如果省略关键字Call，就成为调用sub过程的第二种方式。其格式为： 过程名 [实参表] 与第一种方式相比，它有两点不同： （1）去掉了关键字Call （2）去掉了实参表中的括号。 例如： ppa a,b 【例题5.15】 编写一个计算圆面积的sub 过程，然后，调用该过程计算圆面积。 第一节 Sub过程 Private Sub Command1_Click() Dim a, b a = Val(InputBox(请输入圆半径, 输入数据, 1)) circul a End Sub Private Sub circul(r) Dim area area = 3.1415926 * r * r Print 圆的面积为; area MsgBox (圆面积为 area) End Sub 以上程序创建一个计算圆面积的子程序，即Sub circul(r)过程，该过程的实参表为r，调用过程的方法是将过程作为一个语句，即，circul a。 第二节 Function过程 一、Function过程的定义 1. 格式 [static][private][public] Function 过程名 [（参数表列）][As 类型] 语句组 [过程名] = 表达式] [Exit Function] [语句组] End Function 2. 功能 定义一个Function过程。 第二节 Function过程 3. 注意事项 （1）定义Function过程时，必须以Function开始，以End Function结束。在其之间是描述过程操作的语句组，可以是一个语句，也可以是若干个语句，语句组中的语句