访问 VBA：如何在表单中获取输入并在查询中使用它们

Posted 2023-04-19

【中文标题】访问 VBA：如何在表单中获取输入并在查询中使用它们

【英文标题】：Áccess VBA:How to get input in forms and use them in queries

【发布时间】：2008-12-02 08:13:32

【问题描述】：

嗨

我有一个带有几个按钮的表单。每个按钮运行几行代码。代码中也有查询，例如“select * from table where number =6”

现在如果我想在表单中输入数字，我该怎么做。

【参考方案1】：

在按钮附近添加一个未绑定的文本控件。

更新您的按钮代码以生成查询字符串：

"SELECT * FROM myTable WHERE myNumber =" & me.controls("myControlName").value

您可能觉得需要确保“myControlName”控件只允许数字/不接受 null，或者在您的过程中处理所有情况

---

myQuery = "SELECT * FROM myTable"
If Isnull(me.controls("myControlName").value) then
Else
    If isnumeric(me.controls("myControlName").value) then 
        myQuery = myQuery & " WHERE myNumber =" & me.controls("myControlName").value     
    Else 
        msgBox me.controls("myControlName").value & " is not accepted" 
        Exit function 
    Endif
Endif