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

kelvinso

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



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

shenrenba

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

回复 2# shenrenba


謝謝你幫忙，謝謝