007　创建Function程序

◎过程、模块与语句：“添加过程”对话框、Function关键字

Function程序又称为函数，需要返回计算的结果。制作出Function程序之后，可以在Access的查询或者窗体中使用该程序，将其当作自定义函数使用。

与Sub过程相比，Function程序过程中必须含有“程序名=返回值”这样的代码。

创建Function程序，也有两种方法可供选择，一种是在VBA编辑器代码窗口打开的情况下，选择“插入/过程”命令打开“添加过程”对话框，选中“函数”单选按钮，设置名称即可创建Function程序，如图1-13所示。

另一种方法是直接在VBA编辑器代码窗口中输入“Function程序名”来创建Function程序。

◎应用实例

素材\第1章\创建Function过程.accdb

本例通过上述的第二种方法创建一个Function程序“求积”，该程序可以返回两个参数的积。然后创建一个Sub过程，在该过程中调用“求积”程序，并使用信息框输出求积的结果。

◎案例操作

01　在代码窗口创建Function程序“求积”。

02　在代码窗口中创建Sub过程“调用求积”。

03　按【F5】键运行“调用求积”过程，查看代码运行效果。

◎过程源代码

源文件\第1章\创建Function过程.accdb

创建Function程序，编写VBA代码，在Sub程序中调用Functon程序，其具体的VBA代码如下。

◎执行过程

按【F5】键运行“调用求积”过程，结果如图1-14所示。