ACCESS【VBA】：018显示输入对话框

显示输入对话框

内置函数：inputbox函数

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

使用Inputbox函数输入数据的语法格式如下所示：

[变量]=inputbox “提示内容”,[标题],'默认值'

实例操作

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

1、在窗体中抛入文本框和“输入数据”按纽。

2、在代码窗口中抛入“cmd_输入_click”事件过程。

3、在“cmd_输入_click”事件过程中输入代码。

4、单击按纽运行程序，查看运行效果。

执行代码

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

VBA代码

'通过输入对话框将数据输入到文本框中

Private Sub cmd_输入_Click()

    txt_数据 = InputBox('请输入数据：', '输入数据', '默认值')

End Sub