|
|
本帖最后由 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 ;==>
复制代码 |
评分
-
查看全部评分
|