0

经过几个小时的搜索，我找不到任何解决我遇到的这个小问题的方法。

我有一个从表单中检索其条件之一的查询。我已经从查询中正确引用了表单上的值，它可以工作，但我想做的有点复杂：当表单关闭时，我想使用“默认值”启动查询。

我尝试以两种不同的方式进行操作： a) 在查询条件中定义“IIf”：我需要一个函数来检查我从中检索值的表单是否打开。b) 使用默认值定义公共变量，该值将从以下形式更改：我不知道在何处/何时初始化变量的值。

有没有人对如何做到这一点有更好的想法？

TL;DR：查询在打开时从表单中获取标准。如果表单已关闭，则查询使用默认值。帮助！

4

1 回答 1

2

您可以在模块中创建 VBA 函数来执行此操作：

Function MyCriterion() As Long

  MyCriterion = 1234                           '   default value

  If CurrentProject.AllForms("MyForm").IsLoaded Then

      MyCriterion = Forms("MyForm").MyControl.Value

  End If

End Function
于 2013-03-28T09:30:19.083 回答