标题：请问下在窗口设计里，怎么用代码隐藏显示列

1楼

dark272710 发表于：2011/6/20 12:58:00

因为有比较多的列，想要在窗口里实现这个内容：

多个复选框（列名称）

然后一个按钮，点击后按照所选的显示/隐藏所选列

另一个撤销按钮。

谢谢。。新手，没有在帮助文档里找到。

2楼

ybil 发表于：2011/6/20 13:47:00

显示:

Dim chk As WinForm.CheckBox

For n As Integer = 1 To 10 'n的最大值根据实际情况设定

chk= e.Form.Controls("CheckBox" & n)

Tables("表A").Cols( chk.Text).Visible = chk.Checked

隐藏:

Dim chk As WinForm.CheckBox

For n As Integer = 1 To 10

chk= e.Form.Controls("CheckBox" & n)

Tables("表A").Cols( chk.Text).Visible = Not chk.Checked

撤销:

Dim chk As WinForm.CheckBox

For n As Integer = 1 To 10

chk= e.Form.Controls("CheckBox" & n)

Tables("表A").Cols( chk.Text).Visible = True

[此贴子已经被作者于2011-6-20 16:02:10编辑过]

3楼

dark272710 发表于：2011/6/21 10:47:00

谢谢谢谢~~

有空还是要多研究下各个东西的属性~~争取不做伸手党~

共3 条记录, 每页显示 10 条, 页签: [1]