找回密码
 加入
搜索
查看: 1352|回复: 1

这个问题如何解决,望高手解答、写过

[复制链接]
发表于 2009-7-31 22:07:28 | 显示全部楼层 |阅读模式
本帖最后由 visualc 于 2009-8-2 13:37 编辑

假如一个窗体中有两个复选框(checkbox1、checkbox2) 和一个按钮(Button1)

我想实现的是:点击checkbox1触发一个事件 :比如打开一个文件(zhang.txt)

点击checkbox2触发一个事件:打开一个文件(zhang.jpg)

然后点击按钮(Button1),被选中的复选框将被执行

请高手解答

小弟在此谢过~~~
发表于 2009-7-31 22:34:13 | 显示全部楼层
这是lynfr8前辈写的,稍做改动就能实现你的目的。
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 139, 254, 193, 125)
$Checkbox1 = GUICtrlCreateCheckbox("注册1", 32, 24, 105, 33)
$Checkbox2 = GUICtrlCreateCheckbox("注册3", 32, 104, 73, 17)
$Button1 = GUICtrlCreateButton("全选", 16, 192, 97, 25, 0)
$Button2 = GUICtrlCreateButton("判断", 16, 220, 97, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Button1
                        For $i=1 to 2
                                $T="Checkbox"&$i
                                GUICtrlSetState(Eval($T),$GUI_CHECKED)
                        Next
                Case $Button2        
                        For $i=1 to 2
                                $T="Checkbox"&$i
        If GUICtrlRead(Eval($T))=$GUI_UNCHECKED Then MsgBox(0,0,$T&'没选择')
        If GUICtrlRead(Eval($T))=$GUI_CHECKED Then MsgBox(0,0,$T&'已选择')
                        Next
        EndSwitch
WEnd
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-11-15 08:34 , Processed in 0.076087 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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