干嘛要用msgbox呢,用GUI不行吗
#include <GuiConstants.au3>
Opt("GUIOnEventMode", 1);OnEvent模式
GUICreate("网址导航", 200, 100,-1, -1)
$Label = GUICtrlCreateLabel("www.baidu.com", 60, 10, -1, -1)
GUICtrlSetCursor (-1, 0)
$Button = GUICtrlCreateButton("确定", 70, 60, 55, 20);
GUISetState(@SW_SHOW)
GUISetOnEvent($GUI_EVENT_CLOSE, "_exit")
GUICtrlSetOnEvent($Button, "_exit")
GUICtrlSetOnEvent($Label, "_Button")
While 1
Sleep(100)
WEnd
Func _exit()
Exit
EndFunc
Func _Button()
ShellExecute('http://www.baidu.com')
EndFunc
|