【Access示例】自定义隐藏数据表窗体的列/隐藏列 [查看原文]

最新评论4人参与评论

	2019/2/21 13:14:10刘志刚：关天隐藏数据列的操作，困扰了本人多年。就此浅表的说一说。隐藏列真的可能是Access的一大缺陷，用ColumnHidden属性,当你双击列或是选中斜拉列时（区别于平拉,有时平拉也可以），你刚才隐藏的那些列却又会显示出来,无法真正隐藏。,在子窗体的双击事件或鼠标事件中,再写入一遍（两次）ColumnHidden,才可以避免上述问题实现隐藏列的功能,但相应的后遗症是列的移动位置、多选记录、复制功能也就没有了。

	2018/7/18 17:19:25daviee：例子很好，想问一下老师，如果是列表框， If Me.List75.Selected(i) = True Then Me.frmChild(Me.List75.ItemData(i)).ColumnHidden = True Else Me.frmChild(Me.List75.ItemData(i)).ColumnHidden = False End If 这里该怎么写呢，谢谢！

	2018/7/13 16:11:49稻香：实用，赞一个

	2018/7/13 10:50:50xiaowuo：这个非常棒，辛苦了老师

总记录：4篇页次：1/1 9 1 :

	2019/2/21 13:14:10刘志刚：关天隐藏数据列的操作，困扰了本人多年。就此浅表的说一说。隐藏列真的可能是Access的一大缺陷，用ColumnHidden属性,当你双击列或是选中斜拉列时（区别于平拉,有时平拉也可以），你刚才隐藏的那些列却又会显示出来,无法真正隐藏。,在子窗体的双击事件或鼠标事件中,再写入一遍（两次）ColumnHidden,才可以避免上述问题实现隐藏列的功能,但相应的后遗症是列的移动位置、多选记录、复制功能也就没有了。

	2018/7/18 17:19:25daviee：例子很好，想问一下老师，如果是列表框， If Me.List75.Selected(i) = True Then Me.frmChild(Me.List75.ItemData(i)).ColumnHidden = True Else Me.frmChild(Me.List75.ItemData(i)).ColumnHidden = False End If 这里该怎么写呢，谢谢！

	2018/7/13 16:11:49稻香：实用，赞一个

	2018/7/13 10:50:50xiaowuo：这个非常棒，辛苦了老师