MS Access：引用 VBA 查询定义中的子表单文本框控件元素

Question

我有一个带有用户输入（文本框）的子表单，它可以超过 255 个字符并且可以包含特殊字符。 由于我无法将其作为参数分配给 vba 查询定义（只能​​使用 255 个字符），因此我考虑直接引用文本框：

Insert into ...
Values (Forms!MainFormName!txt_MyTextField, ... )

在 Access GUI 中的查询中确实有效，但在使用以下代码指定的 vba 查询定义中无效：

Set query_definition = CurrentDb.CreateQueryDef("", SQLQuery)) 

"Forms!MainFormName!NameOfSubformNavigationElement!txt_MyTextField" 也不能作为参考，以防万一。 “Forms！MainFormName！NameOfSubformNavigationElement.Form.txt_MyTextField”也不行

我怎样才能得到我想要的？ 字符串可以有任何类型的特殊字符，如 ' 和 "。除了将用户输入附加到 sql 查询之外别无选择吗？是否有一些内置函数来转义这些值？

Answer 1

更新：现在环境已知，添加了另一个示例。

要在操作查询中使用表单字段，请创建一个将返回所需字段的公共函数，然后从您的查询中调用该函数。

Public Function GetFormField() As String
    GetFormField = Forms![MyMainForm]!MySub.Form.MyField
End Function

在您的查询中，使用以下内容：

WHERE ((([106thZip_code_database].zipcode)=GetFormField()));

以下是您可以在主窗体中用于引用子窗体中的字段的示例。 'MySub' 是主窗体上控件的名称 - 不是子窗体的对象名称。

Debug.Print Forms![MyMainForm]!MySub.Form.MyField

关于这个主题的一个很好的参考可以在： http : //access.mvps.org/access/forms/frm0031.htm