autoit中的checkbox应用

来源:互联网 发布:cepii距离数据怎么看 编辑:程序博客网 时间:2024/05/29 02:51

#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.3.6.1
 Author:         myName

 Script Function:
 Template AutoIt script.

#ce ----------------------------------------------------------------------------

; Script Start - Add your code below here
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
;

;MsgBox(1,"test","abc!")
 Local $msg

    GUICreate("liuyubin") ; will create a dialog box that when displayed is centered
 Opt("GUICoordMode", 2)
    GUISetState(@SW_SHOW) ; will display an empty dialog box
 $Button_1 = GUICtrlCreateButton("My test", 10, 30, 100)
 $check1 = GUICtrlCreateCheckbox("CHECKBOX 1", -1,0, 120, 20)
 $check2 = GUICtrlCreateCheckbox("CHECKBOX 2", -1,0, 120, 20)
 $check3 = GUICtrlCreateCheckbox("CHECKBOX 3", -1,0, 120, 20)
 $check4 = GUICtrlCreateCheckbox("CHECKBOX 4", -1,0, 120, 20)


    ; Run the GUI until the dialog is closed
    While 1
        $msg = GUIGetMsg()

        Select
            Case $msg = $GUI_EVENT_CLOSE
                ExitLoop
            Case $msg = $Button_1
                ConsoleWrite("liuyubin"&@CRLF)
    If GUICtrlRead($check1)=1 Then ConsoleWrite("CHECKBOX 1"&@CRLF)
    If GUICtrlRead($check2)=1 Then ConsoleWrite("CHECKBOX 2"&@CRLF)
    If GUICtrlRead($check3)=1 Then ConsoleWrite("CHECKBOX 3"&@CRLF)
    If GUICtrlRead($check4)=1 Then ConsoleWrite("CHECKBOX 4"&@CRLF)
    

        EndSelect
  
    WEnd
    GUIDelete()