Ms access ÁAccess VBA:如何在表单中获取输入并在查询中使用它们

Ms access ÁAccess VBA:如何在表单中获取输入并在查询中使用它们,ms-access,forms,Ms Access,Forms,嗨 我有一张有几个按钮的表格。每个按钮都运行几行代码。这些代码中还包含查询,如select*from table,其中number=6 现在,如果我想在表单中输入数字,我该怎么做呢 在按钮附近添加一个未绑定的文本控件。 更新按钮代码以生成查询字符串,如下所示: 从myNumber=&me.controlsmyControlName.value的myTable中选择* 您可能觉得需要确保myControlName控件只允许数字/不接受null,或者处理过程中的所有情况 myQuery = "SEL

我有一张有几个按钮的表格。每个按钮都运行几行代码。这些代码中还包含查询,如select*from table,其中number=6

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

在按钮附近添加一个未绑定的文本控件。 更新按钮代码以生成查询字符串,如下所示:

从myNumber=&me.controlsmyControlName.value的myTable中选择*

您可能觉得需要确保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