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

018 显示输入对话框

◎内置函数:InputBox()函数

在VBA程序中,如果需要在程序执行的过程中输入数据,则可以使用InputBox()函数。

使用InputBox()函数输入数据的语法格式如下所示。

◎应用实例

素材\第1章\显示输入对话框.accdb

本例需要在单击“F_输入对话框”窗体中的“输入数据”按钮,打开输入信息框输入数据,并将输入的数据显示在窗体的文本框中。

◎案例操作

01 在窗体中插入文本框和“输入数据”按钮。

02 在代码窗口插入“cmd_输入_Click”事件过程。

03 在“cmd_输入_Click”事件过程中输入代码。

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

◎过程源代码

源文件\第1章\显示输入对话框.accdb

在事件过程中编写VBA代码,打开输入对话框,将输入数据显示在文本框中,具体的代码如下。

◎执行过程

保存编写的VBA代码,将“F_输入对话框”窗体的视图模式切换到窗体视图,单击“输入数据”按钮,然后输入数据,如图1-28所示。

图1-28 显示输入对话框