vbs循环内容请教

netdzb

下面这段代码是死循环

do
循环内容
loop

我想让代码循环10分就结束应该怎么写啊？

zz100001

设置一个全局时间，来计时，到了时间就跳出，循环里面写 exit do
如果用while写就方便点

1. ' 等待秒数
   
2. ddsj = 10 * 60
   
3. 
   
4. WScript.Echo "开始计时"
   
5. 
   
6. kssj = Now
   
7. diff = 0
   
8. While diff < ddsj
   
9.         WScript.Echo diff
   
10.         Wscript.Sleep 1000
    
11.         diff = (Now - kssj) * 24 * 60 * 60
    
12. WEnd
    
13. 
    
14. WScript.Echo "时间已到"

复制代码