![Access VBA活用范例手册](https://wfqqreader-1252317822.image.myqcloud.com/cover/199/26178199/b_26178199.jpg)
上QQ阅读APP看书,第一时间看更新
◎过程、模块与语句
006 创建Sub过程
◎过程、模块与语句:“添加过程”对话框、Sub关键字
Sub过程可以执行处理过程,但是不会返回值。根据程序是否与特定对象的事件关联,可以分为标准程序和事件程序两类,本例仅讲解如何创建标准的Sub过程。
创建标准的Sub过程,有两种方法可供选择,一种是在VBA编辑器代码窗口打开的情况下,选择“插入/过程”命令,打开“添加过程”对话框,选中“子程序”和“公共的”单选按钮,设置名称即可创建Sub过程,如图1-11所示。
![](https://epubservercos.yuewen.com/11B0D1/14615820604489806/epubprivate/OEBPS/Images/img00040001.jpg?sign=1739602320-HhtNUuiXKgJqU5Bd4Q6qBdeYaOB9jnsD-0-5ebee146dd585c434d30653816b030a8)
图1-11 通过“添加过程”对话框创建Sub过程
另一种方法是直接在VBA编辑器代码窗口中输入“Sub过程名”来创建Sub过程。
◎应用实例
素材\第1章\创建Sub过程.accdb
本例通过上述的第二种方法创建一个Sub过程,该过程通过两个输入对话框得到两个加数,并使用消息对话框返回这两个数的和。
◎案例操作
01 在代码窗口创建Sub过程,并输入求和代码。
02 按【F5】键运行Sub过程,查看代码运行效果。
◎过程源代码
源文件\第1章\创建Sub过程.accdb
创建Sub过程,编写VBA代码,通过输入对话框获取加数,使用消息对话框返回求和结果,其具体的VBA代码如下。
![](https://epubservercos.yuewen.com/11B0D1/14615820604489806/epubprivate/OEBPS/Images/img00041001.jpg?sign=1739602320-anxiwktw2p0Cw7F1kJGmw64yX6x1k67q-0-c7a2186695d26b0741141983643e4bd2)
◎执行过程
按【F5】键,运行“加”过程,结果如图1-12所示。
![](https://epubservercos.yuewen.com/11B0D1/14615820604489806/epubprivate/OEBPS/Images/img00041002.jpg?sign=1739602320-oIdKNe8BvcE1YL9zMOul12ng57sOcI3c-0-4e06f9ff757813ff16ded244294ac93f)
图1-12 创建Sub过程计算两数之和