如何获取GroupBox标题和选中的值 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何获取GroupBox标题和选中的值

共有2330人关注过本帖树形打印复制链接主题：如何获取GroupBox标题和选中的值

nothing

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：517 积分：3383 威望：0 精华：0 注册：2013/1/3 17:08:00

如何获取GroupBox标题和选中的值 发帖心情

Post By：2016/6/20 22:32:00 [只看该作者]

此主题相关图片如下：201562720492582992.png

想通过代码得到GroupBox1的标题和该组中选中的值，比如第一组选中优秀，第二组选中良好

Dim 选值1 As String

选值1 = e.Form.Controls("GroupBox1").标题 & ":" & 该组被选中值的标题

nothing

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：517 积分：3383 威望：0 精华：0 注册：2013/1/3 17:08:00

Post By：2016/6/20 22:38:00 [只看该作者]

标题查到了，用Text

e.Form.Controls("GroupBox1").text

大红袍

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/6/20 23:25:00 [只看该作者]

参考代码

Dim str As String = e.Form.controls("GroupBox1").Text

For Each c As object In e.Form.controls("GroupBox1").Children
    If Typeof c Is winform.RadioButton Then
        If c.checked Then
            str = str & " " & c.text
        End If
    End If
Next
msgbox(str)

下一主题 >> << 上一主题

主题：如何获取GroupBox标题和选中的值