DO...Until 循环问题，请求帮助[已解决]

heroxianf · 发表于 2015-11-26 00:05:19

本帖最后由 heroxianf 于 2015-11-26 01:19 编辑

Local $sPasswd

Do

$sPasswd = InputBox("测试", @CRLF & "测试文件" & @CRLF & @CRLF & @CRLF & @CRLF & "输入登陆密码:", "", "*")

Until $sPasswd = "110"

按照上边的代码倒是可以停留在密码输入界面等到输入正确，但是点击右上角关闭或者退出按钮还是无线循环，也试着获取返回值但是失败了，请指点一下。

afan · 发表于 2015-11-26 00:23:50

Until $sPasswd = "110" Or @Error

heroxianf · 发表于 2015-11-26 00:40:44

本帖最后由 heroxianf 于 2015-11-26 00:46 编辑

回复 2# afan

谢谢A大，原来还可以这么实用@Error。但是我点击退出后边代码会执行，就没有达到点击退出就直接退出那种。

Local $sPasswd

Do

$sPasswd = InputBox("测试", @CRLF & "测试文件" & @CRLF & @CRLF & @CRLF & @CRLF & "输入登陆密码:", "", "*")

Until $sPasswd = "110" or @error

MsgBox(0, 0, "如果点击退出后边代码不应该执行。")

txen548 · 发表于 2015-11-26 01:13:54

試下如下代碼

Local $answer
Do
        $answer =inputbox("口令","你叫什么名字？","","*10")
        If @error Then Exit
                Until $answer = 'me'

heroxianf · 发表于 2015-11-26 01:19:28

本帖最后由 heroxianf 于 2015-11-26 01:27 编辑

回复 4# txen548

谢谢坛友这么晚了还给出的帮助，问题解决了。这嵌套看来还要加强学习。

txen548 · 发表于 2015-11-26 01:21:05

這都是論壇上收集的一些代碼，不用客氣。

heroxianf · 发表于 2015-11-26 01:28:09

回复 6# txen548

但还是有点不明白点击退出为什么是 @error 呢？不应该是返回的三个键值么，-1、-2之类的？

txen548 · 发表于 2015-11-26 01:35:41

主要代碼在第4行，這裡下了一個判斷，如果錯誤就退出程序。

用户名		自动登录	找回密码
密码			加入

[AU3基础] DO...Until 循环问题，请求帮助[已解决]

相关帖子

本帖子中包含更多资源