- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 求代码 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=84317)
-- 发布时间：2016/4/28 11:17:00
-- 求代码
此主题相关图片如下：b@j0`xas9pow57(22c}82y.png
此主题相关图片如下：hwqkiz6(%wzs4tztc8o1.png
图一是表，图二是窗口
-- 发布时间：2016/4/28 11:23:00
--
click事件
Dim t As Table = e.form.controls("Table1").Table
t.Filter = "组名 = \'" & e.Sender.Text & "\'"
For Each r As row in t.Rows
r.Checked = True
Next
-- 发布时间：2016/4/28 11:33:00
--
单选框每一个Click都要写这段代码？
-- 发布时间：2016/4/28 11:33:00
--
是
-- 发布时间：2016/4/28 11:33:00
--
直接checkchanged写可以吗
-- 发布时间：2016/4/28 11:35:00
--
也可以的。但是你要判断是 e.Sender.Checked 是 true 还是 false
-- 发布时间：2016/4/28 11:43:00
--
好的，感觉还是你的代码比较简洁，谢谢