ms-access - 在 MS-Access 中以编程方式隐藏列

Question

我想隐藏或显示基于来自用户选择的变量数据的列。如何在 MS-Access 2003 中将列设置为隐藏？

例如，

用户更改事件后...

For Each ctl In Me.FormNameHere.Form.Controls
    If (TypeName(ctl) = "Textbox") Then
        If InStr(GetTextList(), ctl.Name) > 0 Then
            ctl.hidden = True
        Else
            ctl.hidden = False
        End If
    End If
Next ctl

应对此类挑战的最佳方法是什么？

有没有更明显的解决方案？

Answer 1

控件没有“隐藏”属性(Access 中的任何对象都没有隐藏属性)。他们确实有一个 .Visible 属性。

为了将来引用，我建议您熟悉 VBE 中的对象浏览器——打开 VBE 并按 F2。然后，您可以将搜索限制在项目中使用的各个库。不过，要了解对象模型确实需要一段时间。

此外，您可以依靠 Intellisense 来了解对象的属性/方法，因此在您使用的表单代码中，您可以键入“Me.MyTextBox”。 Intellisense 下拉菜单将显示该特定控件的所有属性和方法。它不适用于通用控制变量(如您的代码中)，因为不同的控件类型具有不同的属性。

而且，当然，属性表给出了属性的名称，即使在代码中它们并不总是使用相同的拼写法(通常它们是相同的，但删除了空格)。

此外，根据它是常规表单还是数据表表单，您可能希望如何执行此操作也存在差异。在数据表中，您的控件还具有 .ColumnHidden 和 .ColumnWidth 属性(在数据表 View 以外的任何 View 中设置这些属性都无效，并且这些属性在标准属性表中都不可用，但在保存时保留对它们的更改表格)。