Microsoft Access 07 VBA:使用文本框或组合框作为控件来隐藏列

时间:2014-07-10 14:44:21

标签: vba text hide

我目前有一张表格。表单包含显示查询的子表单。表格还有两个文本框和两个框的按钮。第一个框用作查询的过滤器,以过滤特定记录。第二个框用于隐藏查询中的列。我的问题是我的代码不能识别文本框,或者我的表单中的任何外部源代码都可以找到。这是我目前的代码:

Private Sub Command137_Click()

Forms![Vermont]![Query1 subform].Form.[Query1 Field Name].ColumnHidden = True

End Sub

目前,如果我将“Query1 Field Name”替换为查询中存在的任何字段名称,该列将隐藏。但是,如果用其他任何东西替换,我会收到以下错误:

“运行时错误'2465' Microsoft Access无法找到字段'|'在你的表达中提到“

我很确定我没有正确引用表单控件。我尝试用以下代码替换[Query1字段名称]:

[Text142.Text]
[=Text142]
[Text142]
[Forms![Vermont]![Text142]]

我对VBA很新,但我觉得这很容易解决;如果可能的话。

提前感谢您的帮助!

1 个答案:

答案 0 :(得分:0)

子表单引用总是有点奇怪。但这应该有用:

Forms![Vermont]![Query1 subform]![Text142].ColumnHidden = True