SplitForm中如何隐藏列？

cgsilicone

不知道你为什么要这样设计窗体，有更好的设计方式。
按你的设想是可以实现的，有些麻烦。
1、ColumnHidden 起作用只能在 Form_Open，所以需要好好设计你的Form_Open
2、在需要改变ColumnHidden的地方，触发 Form_Open，简单简单代码如下：

Private Sub Command1_Click()
    开关 = True
    DoCmd.OpenForm "窗体1", acFormDS
    DoCmd.OpenForm "窗体1", acNormal
End Sub

Private Sub Command2_Click()
   开关 = False
   DoCmd.OpenForm "窗体1", acFormDS
   DoCmd.OpenForm "窗体1", acNormal
End Sub


Private Sub Form_Open(Cancel As Integer)
Me.Form.Controls("列1").ColumnHidden = 开关
End Sub

当然还需要在模块中加入：Public 开关 As Boolean

cgsilicone

lazybird 发表于 2018-11-30 09:42
谢谢了，困扰了几天的问题虽然没有完美解决，但已经是目前知道的“最佳答案”了。
不知道您说的“更好的 ...

不知道你的具体要求，但一定有多种方法实现。
具体到你现在的这个隐藏列的问题，在子窗体控件里放查询表（不是放窗体）就是一个好的选择。
设计好查询表，只用要显示的列生成查询表，就完全没有需要隐藏的问题。