找回密码
 加入
搜索
查看: 1210|回复: 2

菜鸟求问Radio控件问题

[复制链接]
发表于 2009-8-13 19:04:16 | 显示全部楼层 |阅读模式
本帖最后由 pengjun521 于 2009-8-13 19:48 编辑

创建了一个Group控件,里面添加了几个Radio控件,请问怎么获取到哪个Radio被按下
谢谢答复
发表于 2009-8-13 19:19:13 | 显示全部楼层
#include <GUIConstantsEx.au3>

GUICreate("选框测试", 300, 200)
Dim $Checkbox[4], $cb[4], $radio[4], $rd
$Checkbox[1] = GUICtrlCreateCheckbox("复选框1", 20, 20, 120, 20)
$Checkbox[2] = GUICtrlCreateCheckbox("复选框2", 20, 50)
$Checkbox[3] = GUICtrlCreateCheckbox("复选框3", 20, 80)
$radio[1] = GUICtrlCreateRadio("单选框1", 150, 20)
$radio[2] = GUICtrlCreateRadio("单选框2", 150, 50)
$radio[3] = GUICtrlCreateRadio("单选框3", 150, 80)
$Button = GUICtrlCreateButton('查看选择', 70, 130, 150, 25)
GUISetState()

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Button
                        For $i = 1 To 3
                                If BitAND(GUICtrlRead($Checkbox[$i]), $GUI_CHECKED) Then
                                        $cb[$i] = '复选框 ' & $i & ' 已选中'
                                Else
                                        $cb[$i] = '复选框 ' & $i & ' 未选中'
                                EndIf
                        Next
                        For $i = 1 To 3
                                If BitAND(GUICtrlRead($radio[$i]), $GUI_CHECKED) Then $rd = '单选框 ' & $i & ' 已选中'
                        Next
                        MsgBox(0, '状态:', $cb[1] & @CRLF & $cb[2] & @CRLF & $cb[3] & @CRLF & $rd)
        EndSwitch
WEnd
 楼主| 发表于 2009-8-13 19:48:17 | 显示全部楼层
楼上的  太感谢你的指导了   祝福你
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-5-2 18:27 , Processed in 0.071988 second(s), 19 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表