不知道这样算不算符合要求了
#include <GUIConstantsEx.au3>
GUICreate("Form1", 283, 45, 193, 125)
GUICtrlCreateInput("", 16, 8, 169, 21)
$Button1 = GUICtrlCreateButton("Button1", 200, 8, 73, 25, 0)
GUICtrlSetState ( -1, $GUI_DISABLE )
Dim $AccelKeys[1][2] = [["{Enter}", $Button1]] ;输入地址后,直接按回车即可获取结果
GUISetAccelerators($AccelKeys)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
GUICtrlSetState ( $Button1, $GUI_ENABLE )
MsgBox(0,"","又可以用了")
EndSwitch
WEnd
|