- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 如何快速清除窗口中所有复选框的选中状态 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=177597)
-- 发布时间：2022/5/27 18:15:00
-- 如何快速清除窗口中所有复选框的选中状态
请问如何快速清除窗口中所有复选框（checkbox）的选中状态?
此主题相关图片如下：12333.png
-- 发布时间：2022/5/28 8:44:00
--
遍历窗口控件：http://www.foxtable.com/webhelp/topics/1849.htm
For Each c As Winform.Control In e.Form.Controls
If Typeof c Is WinForm.checkbox Then \'判断控件是否是复选框
Dim t As WinForm.checkbox= c
t.Checked = false
……
[此贴子已经被作者于2022/5/28 8:44:28编辑过]
-- 发布时间：2022/5/28 18:33:00
--
按照老师的指点写代码如下：可是运行后，虽然能够取消选取，但当再次选择其中一个复选框时，会自动选取之前已经取消了的复选框，请老师看一下我的代码是否有问题，该如何修改？谢谢！
For Each c As Winform.Control In e.Form.Controls
If Typeof c Is WinForm.checkbox Then \'判断控件是否是复选框
Dim t As WinForm.checkbox= c
t.Checked = False
End If
Next
-- 发布时间：2022/5/29 20:04:00
--
代码放到哪里的？应该和这个代码没有关系。
-- 发布时间：2022/5/29 21:34:00
--
代码放到窗口中按钮的，不知道怎么会这样？
-- 发布时间：2022/5/29 21:48:00
--
去掉这个代码就没有问题？做个例子发上来测试一下
-- 发布时间：2022/5/29 22:02:00
--
如果不绑定表列就能够正常用，当绑定了表列后就出现取消后重新选取其中一个，而之前取消的另外几个也会被选中，请老师看一下我发的示例。
-- 发布时间：2022/5/29 22:06:00
--
看看：http://www.foxtable.com/webhelp/topics/2436.htm
绑定的直接改表格
-- 发布时间：2022/5/29 22:18:00
--
看了还是不明白，请教老师取消所有选取状态的代码应该怎样改写才能正常使用？
-- 发布时间：2022/5/29 22:34:00
--
Dim r As Row = Tables("表A").current
If r IsNot Nothing Then
For Each c As Col In Tables("表A").cols
If c.IsBoolean Then
r(c.name) = False
End If
Next
End If