visualc 发表于 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
页: [1]
查看完整版本: 这个问题如何解决,望高手解答、写过