- 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=35251)
-- 发布时间：2013/6/27 11:32:00
-- 求助
请问：
在窗口中的某页面集合（如Page1）内有一分组框（如GroupBox16），分组框内有CheckBox控件（如图CheckBox7，CheckBox8，CheckBox9，控件数量是不定的），如何对选中的控件进行定义集合，请高手帮忙。
此主题相关图片如下：qq截图.jpg
-- 发布时间：2013/6/27 11:48:00
--
没有看明白你的问题
-- 发布时间：2013/6/27 11:51:00
--
Dim ilist As List(of winform.control) = forms("窗口1").controls("GroupBox1").Children
[此贴子已经被作者于2013-6-27 11:51:58编辑过]
-- 发布时间：2013/6/27 11:53:00
--
要对checkbox控件定义一个集合，请帮忙。谢谢！
-- 发布时间：2013/6/27 11:56:00
--
这个集合包括所有checkedBox? 还是仅仅包括某个groupbox中的checkedBox？
选择中控件定义集合是什么意思？
问题，最好具体一点。
-- 发布时间：2013/6/27 11:58:00
--
谢谢！对勾选项，又如何定义呢？
-- 发布时间：2013/6/27 12:03:00
--
Dim ilist As List(of winform.control) = forms("窗口1").controls("GroupBox1").Children
获得所有GroupBox1里面的checkbox
然后再遍历判断checed是否为TRUE即可.
-- 发布时间：2013/6/27 12:05:00
--
Dim grp As WinForm.GroupBox = e.Form.Controls("GroupBox1")
For Each chk As WinForm.CheckBox In grp.Children
If chk.Checked Then
messagebox.show(chk.Text & "选择了")
Else
messagebox.show(chk.Text & "没有选")
End If
Next
-- 发布时间：2013/6/27 12:09:00
--
就是要这个了，谢谢！
-- 发布时间：2013/6/27 13:03:00
--
你好！刚才给我的代码测试过了，结果是空集合，我查过原因是：我的复选框控件，是打开窗口时生成的，而不是在窗口中固有的，又该怎样定义呢？