|
本帖最后由 feicuiboy 于 2009-9-3 18:55 编辑
Func body()
*******
EndFunc
Func login()
$Form1 = GUICreate("12541", 332, 201, -1, -1, $WS_CAPTION)
GUICtrlCreateLabel("", 1, 50, 332, 1, $SS_ETCHEDHORZ)
GUICtrlCreateLabel("", 110, 51, 1, 150, $SS_ETCHEDVERT)
$Button2 = GUICtrlCreateButton("登陆", 128, 152, 75, 25, 0)
GUICtrlSetState($Button2, $GUI_DEFBUTTON)
$Button1 = GUICtrlCreateButton("游客浏览", 24, 90, 60, 60, $BS_MULTILINE)
GUICtrlSetFont(-1, 15)
$Label1 = GUICtrlCreateLabel("xx查询系统", 50, 15, 300, 30)
GUICtrlSetFont(-1, 22)
$Label2 = GUICtrlCreateLabel("用户名", 128, 80, 36, 17)
$Label3 = GUICtrlCreateLabel("密码", 128, 112, 36, 17)
$Input1 = GUICtrlCreateInput("xxx", 176, 80, 121, 21)
$Input2 = GUICtrlCreateInput("请输入密码", 176, 112, 121, 21, $ES_PASSWORD)
$Button3 = GUICtrlCreateButton("退出", 230, 152, 75, 25, 0)
GUISetState(@SW_SHOW)
if $Label2="100" then
msgbox(0,"登陆正确")
body()
winkill(?????)
EndFunc
login()
如
如何在登陆成功后关闭上面的窗体,用winkill可以吗??如何操作
if $Label2="100" then
msgbox(0,"登陆正确")
body()
winkill(?????) |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有账号?加入
×
|