上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 显示输入对话框