Foxtable(狐表)用户栏目专家坐堂 → 求助


  共有4179人关注过本帖树形打印复制链接

主题:求助

帅哥哟,离线,有人找我吗?
许生
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:12 积分:146 威望:0 精华:0 注册:2013/6/26 9:39:00
求助  发帖心情 Post By:2013/6/27 11:32:00 [只看该作者]

请问:

在窗口中的某页面集合(如Page1)内有一分组框(如GroupBox16),分组框内有CheckBox控件(如图CheckBox7,CheckBox8,CheckBox9,控件数量是不定的),如何对选中的控件进行定义集合,请高手帮忙。


图片点击可在新窗口打开查看此主题相关图片如下:qq截图.jpg
图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/6/27 11:48:00 [只看该作者]

没有看明白你的问题

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/6/27 11:51:00 [只看该作者]

Dim ilist As List(of winform.control) = forms("窗口1").controls("GroupBox1").Children
[此贴子已经被作者于2013-6-27 11:51:58编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
许生
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:12 积分:146 威望:0 精华:0 注册:2013/6/26 9:39:00
  发帖心情 Post By:2013/6/27 11:53:00 [只看该作者]

要对checkbox控件定义一个集合,请帮忙。谢谢!

 

 


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/6/27 11:56:00 [只看该作者]

这个集合包括所有checkedBox? 还是仅仅包括某个groupbox中的checkedBox?

选择中控件定义集合是什么意思?

问题,最好具体一点。


 回到顶部
帅哥哟,离线,有人找我吗?
许生
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:12 积分:146 威望:0 精华:0 注册:2013/6/26 9:39:00
  发帖心情 Post By:2013/6/27 11:58:00 [只看该作者]

谢谢!对勾选项,又如何定义呢?

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/6/27 12:03:00 [只看该作者]

Dim ilist As List(of winform.control) = forms("窗口1").controls("GroupBox1").Children

获得所有GroupBox1里面的checkbox

然后再遍历判断checed是否为TRUE即可.

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By: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

 回到顶部
帅哥哟,离线,有人找我吗?
许生
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:12 积分:146 威望:0 精华:0 注册:2013/6/26 9:39:00
  发帖心情 Post By:2013/6/27 12:09:00 [只看该作者]

就是要这个了,谢谢!

 回到顶部
帅哥哟,离线,有人找我吗?
许生
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:12 积分:146 威望:0 精华:0 注册:2013/6/26 9:39:00
  发帖心情 Post By:2013/6/27 13:03:00 [只看该作者]

你好!刚才给我的代码测试过了,结果是空集合,我查过原因是:我的复选框控件,是打开窗口时生成的,而不是在窗口中固有的,又该怎样定义呢?


 回到顶部
总数 13 1 2 下一页