【已解决】看看这段代码为何不能退出循环

ScriptFans · 发表于 2016-2-14 19:26:06

本帖最后由 ScriptFans 于 2016-2-17 00:27 编辑

$hSearch=FileFindFirstFile(@WorkingDir&"\*.*")
Do
    MsgBox(0,"",FileFindNextFile($hSearch))
Until  @error

为什么当@error为1的时候不能退出循环，还会一直执行，大家先测试下。

nmgwddj · 发表于 2016-2-15 11:13:46

外面包裹了一层 msgbox，它是最后一次执行的函数，它执行是一直成功的，不会有 @error。
相当于


Do
    Local $err = FileFindNextFile($hSearch)
    MsgBox(0, "", $err);
Until @error

你说这样能退出吗？

ScriptFans · 发表于 2016-2-15 12:54:33

哦哦，对的，感谢感谢！！

afan · 发表于 2016-2-16 23:59:25

改标题

nqawen · 发表于 2016-2-20 10:45:27

学习了，谢谢

		自动登录	找回密码
密码			加入

[系统综合] 【已解决】看看这段代码为何不能退出循环