主题：关于显示列的问题

此主题相关图片如下：复选框.jpg

当在复选框1上打勾时显示第三列，取消打勾是隐藏第三列，请问这个代码怎么写啊

Dim ck1 As WinForm.CheckBox = e.Form.Controls("CheckBox1")
Dim tb As Table=Tables("订单主表.订单数量明细")
If ck1.Checked Then
    tb.Cols("T80").Visible=True
Else
    tb.Cols("T80").Visible=False
End If

这是关联表的显示列代码

 

比如说，订单主表和订数量单明细关联，关联列为“合同号”列，在窗口里有一个CheckBox，当我点击时只针对该合同号的指定列（比如说“T80”）起作用，点击别的合同号不起作用（比如说别的合同号是隐藏“T90”列）

请问这样可以吗？

 

Dim ck1 As WinForm.CheckBox = e.Form.Controls("CheckBox1")
Dim tb As Table=Tables("订单主表.订单数量明细")
If ck1.Checked Then
    tb.Cols("T80").Visible=True
Else
    tb.Cols("T80").Visible=False
End If

 

那这个代码放哪？

感觉不像我要的

最好的是，比如说有两个订单分别为“1001101”，“1001102”各自无关，“1001101”隐藏的是T80列，“1001102”隐藏的是T90列，当点击“1001101”其隐藏的是“T80“的列，如果点击"1001102”订单时”T80“自动显示”T90“隐藏，

不会啊

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:测试项目.table

谢谢

是，就是不知道放哪里？

 

没反应

有没有什么办法，把它放在全局变量里，直接点“1111”或“2222”自动变化啊

加进去没反应