#包含?& ltButtonConstants.au3 & gt
#包含?& ltEditConstants.au3 & gt
#包含?& ltGUIConstantsEx.au3 & gt
#包含?& ltWindowsConstants.au3 & gt
Opt("GUIOnEventMode ",1)
全球?$flag?=?錯誤的
#地區?###?開始?柯達?GUI?節?###?表單=
全球?$Form1?=?GUICreate("抽彩?抽號?1~100",?623,?449,?192,?114)
GUISetOnEvent($GUI_EVENT_CLOSE,?" Form1Close ")
全球?$Input1?=?GUICtrlCreateInput(",?56,?72,?161,?25,?$ES_READONLY)
全球?$Button1?=?GUICtrlCreateButton ("start ",264,?72,?65,?25)
GUICtrlSetOnEvent(-1,?" Button1Click ")
GUISetState(@SW_SHOW)
#EndRegion?###?結束?柯達?GUI?節?###
什麽時候?1
睡眠(100)
如果?$flag?然後
GUICtrlSetData($Input1,?Random(1,100,1))
EndIf
行
Func?Button1Click()
如果?不是嗎?$flag?然後
GUICtrlSetData($Button1,?“停止”)
$flag?=?真實的
其他
GUICtrlSetData($Button1,?“開始”)
$flag?=?錯誤的
EndIf
EndFunc
Func?表單1關閉()
出口
EndFunc
翻譯