本帖最后由 qq82015930 于 2012-3-27 23:40 编辑
这个密码能实现修改嘛,如果能,该怎么做??#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 371, 121, 192, 124)
$Input1 = GUICtrlCreateInput("", 32, 32, 121, 21)
$Button1 = GUICtrlCreateButton("验证密码", 168, 32, 75, 25)
$Button2 = GUICtrlCreateButton("修改密码", 256, 32, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$Msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
Exit
Case $msg = $Button1
pass()
EndSelect
WEnd
Func pass()
If GUICtrlRead($Input1) = "" Then ;判断输入框是否为空
MsgBox(262208, "警告", "密码不能为空")
ElseIf GUICtrlRead($Input1) = "qq82015930" Then
MsgBox(262208, "警告", "密码正确")
Else
MsgBox(262208, "警告", "密码不正确")
EndIf
EndFunc ;==>
|