请大家看看这句循环语句有 什么问题

episode9

这是我 写 的循环语句，判断有二个 条件，一是文档中 出现xxxx，跳出循环，二是如果循环时间超过10秒也跳出循环，但在测试中发现文档中出现了xxxx后，也 要等到10秒后才 跳出循环，不 知什么原因，请 大家看看。


Do Until(Not doc.getElementById("xxxx)") Is Nothing)  or (Application.Wait (Now + TimeValue("0:00:10")))
            DoEvents
do loop

[ 本帖最后由 episode9 于 2009-12-23 22:16 编辑 ]

lb_bn

用timer如何？
如
itm = timer
(timer - itm >= 10 and timer = itm <= 10.5)

episode9

测试后成功，感谢IB_BN的帮助。