Access VBA活用范例手册
上QQ阅读APP看书,第一时间看更新

015 递归调用中的参数传递

◎过程、模块与语句:If…Then…Else语句、递归调用

Function程序在其他程序中的调用与系统内置的函数的方式相同,可参考实例007。

在程序设计中,递归调用是一种应用得比较广泛的算法,通过直接或者间接地调用函数自身,从而方便地解决许多复杂的问题,其具体的语法格式如下所示。

◎应用实例

素材\第1章\递归调用中的参数传递.accdb

本例需要使用递归调用来创建一个求解阶乘的函数,并调用该函数求解阶乘。

◎案例操作

01 在窗体中插入两个文本框和“计算阶乘”按钮。

02 在代码窗口中创建Function函数“阶乘”。

03 在代码窗口插入“cmd_阶乘_Click”事件过程。

04 执行运行程序,查看程序运行效果。

◎过程源代码

源文件\第1章\递归调用中的参数传递.accdb

创建Function程序“阶乘”和“计算阶乘”按钮的单击事件过程,编写VBA代码,其具体的VBA代码如下。

◎执行过程

保存编写的VBA代码,将“F_计算阶乘”窗体的视图模式切换到窗体视图,在第一个文本框中输入欲求阶乘的数字,单击“计算阶乘”按钮,如图1-25所示。

图1-25 通过递归调用求解阶乘