[电脑基础知识]VB编程38过程及函数.pptVIP

过程是完成某种特定功能的一组独立程序代码。通过参数传递，实现与主程序之间的数据传递、操作等。 VB的过程主要分为两个部分： 一、事件过程 指附加在窗体和控件上的一段程序，当某个对象对一个事件（click）的发生作出响应时，自动调用与该事件相关的事件过程。 1、子过程（Sub过程）的定义格式 定义Sub过程的一般格式如下： [Public|Private][Static]Sub 过程名（参数1，参数2） 语名组exit sub ‘过程体 End Sub 说明： Public表示全局通用过程，可在整个程序范围内被所有窗体模块调用 Private（默认）表示私有过程，能被在本窗体或模块中的各段事件过程调用 static表示该过程中所有局部变量是静态变量，在过程被调用后其值仍然保留 例： 试创建一个求长方形面积的通用过程mj private sub mj(a as single , b as single) Dim s S=a*b Print s End sub 2、子过程（Sub过程）的建立方法 常创建和保存在窗体文件和标准模块文件中。 （1）在代码窗口中定义 在窗体的“代码”窗口?“通用”?“声明”段按定义形式输入。 工程?添加模块?通用声明段,按定义格式输入或通过方法2添加。 (2)?进入代码窗口，利用“工具”菜单下的“添加过程”命令定义 修改过程名 过程类型：子程序 范围：公有、私有 单击“确定”后，系统自动建立一个子过程或函数过程模板，如需参数自行添加。 【例3.14】 试创建一个判断一个正整数是否为素数的公有的通用过程prime。 操作步骤： （1）在VB“工程”菜单中选择“添加模块”，向工程添加一标准模块。若工程已有模块，则省略该步，直接进行第2步。 （2）在工程资源管理器中双击模块（Modulel），打开该模块的代码编辑器窗口。 （3）在VB“工具”菜单中选择“添加过程”，打开添加过程的对话框，如图3.23所示，然后在对话框的名称框中输入过程名：prime，最后单击确定按钮，此时，系统就会自动在标准模块窗口中生成该过程的框架。 （4）在过程名后的括号中输入接受参数的变量名及数据类型说明。 n As Integer, f As Boolean （5）在产生的通用过程内，编写实现相应功能的代码。如图3.24所示。 【例3.15】 利用【例3.14】中的通用过程prime，求100以内的素数。 在工程中添加【例3.14】创建的标准模块，在窗体中编写如下的程序代码： 三、Function函数过程 VB函数分为内部函数和外部函数 内部函数是系统预先编好的，能完成特定功能的一段程序。如sqr，cos等 外部函数则是用户根据需要自己用function关键字定义的函数过程。 它与子过程不同的是，函数过程可以返回一个值给调用的表达式。 1、 Function函数过程的定义格式： 定义函数过程的一般格式如下： [Public|Private|Static]Function函数名（参数1，参数2…）[AS类型] 语句 函数过程名=返回值表达式 ‘返回数据 语句 Exit Function End Function 说明： 参数的格式与sub过程类型相同 “AS 类型”说明返回值的类型。省略，返回变体型值 在函数体内，函数名可当变量使用，函数的返回值就是通过对函数名赋值来实现，即函数值通过函数名返回。 函数不能嵌套 例如： function max(a as integer,b as integer) as integer if ab then max=a else max=b end if End function 例：编写一个函数过程，判断一个整数是不是素数。如果是，返回true，否则返回false。 Private function sushu(n as integer) as boolean Dim k%, f as boolen f=true For k=2 to n-1 If n mod k =0 then f=false : exit for Next k Sushu=yes End function 2、 Function函数的建立方法： 同过程的建立类似 方法一：进入代码窗口，在“通用—声明”中输入function和函数名 方法二：打开代码窗口，在主菜单中选择“工具”→“添加过程”，在对话框中选择“函数”即可 3、 Function函数的调用 函数的调用方法与使用标准函数类似，即用函数名调用，