以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]遍历被选中的复选框  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=191335)

--  作者:jjjeyes
--  发布时间:2024/4/11 13:50:00
--  [求助]遍历被选中的复选框
For Each c As Winform.Control In e.Form.Controls("GroupBox1").children
    If TypeOf c Is winform.CheckBox Then
        MessageBox.Show (c.Name)      
    End If 
Next

我想遍历已经选中的复选框,可是设置的变量下好像没有checked这个属性了,请问怎么解决

--  作者:有点蓝
--  发布时间:2024/4/11 13:55:00
--  
For Each c As Winform.Control In e.Form.Controls("GroupBox1").children
    If TypeOf c Is winform.CheckBox Then
dim a as winform.CheckBox = c
        MessageBox.Show (a.Name & "-" & a.checked)      
    End If 
Next