请问下在窗口设计里，怎么用代码隐藏显示列 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

显示:

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编辑过]

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