kelvinso 发表于 2014-6-12 16:54:28

請問怎樣可以密密錯覺會有提示,3次錯誤後才自動關閉

If InputBox('Clone SysTEM', '      CitiNET Computer System      ' & @LF & _
                '       Please Enter The Password         ' & @LF & @LF & _
                '      ', '', '*M', -1, 150) = $pass Then



請問怎樣可以密密錯覺會有提示,3次錯誤後才自動關閉

shenrenba 发表于 2014-6-12 17:06:54

Local $i = 0, $pass = "cashi", $iput
While $i < 3
        $iput = InputBox('Clone SysTEM', '      CitiNET Computer System      ' & @LF & _
                        '       Please Enter The Password         ' & @LF & @LF & _
                        '      ', '', '*M', -1, 150)
        If @error Then ExitLoop
        If $iput = $pass Then
                MsgBox(0, 0, "密码正确")
        Else
                $i += 1
                MsgBox(0, 0, "第"&$i&"次密码错误")
        EndIf
WEnd
Exit

kelvinso 发表于 2014-6-12 18:36:23

回复 2# shenrenba


謝謝你幫忙,謝謝
页: [1]
查看完整版本: 請問怎樣可以密密錯覺會有提示,3次錯誤後才自動關閉