QTP自动化测试之VBScript基础知识教程(9)

发表于:2011-09-09来源:未知作者:领测软件测试网采编点击数: 标签:自动化测试qtp教程基础知识VBScript
4 [statements] 5 Loop [{ While | Until } condition] 主要参数: condition:数值或字符串表达式,其值为True或False。如果condition为Null,则condition被当作False。 statements:
4     [statements]
5 Loop [{While | Until} condition]

  主要参数:

  condition:数值或字符串表达式,其值为True或False。如果condition为Null,则condition被当作False。

  statements:当condition为True时被重复执行的一条或多条命令。

  Exit Do可以退出循环体,循环可以嵌套使用。

view sourceprint?

01 Do Until response = vbNo
02     myNum = Int(6 * Rnd + 1)   '产生1到6之间的随机数
03     response = MsgBox(myNum & "想要另一个数吗?", vbYesNo)
04 Loop
05  
06 Dim check, counter
07 check = True : counter = 0
08 Do
09     Do While count < 20
10         counter = counter + 1  '增加计数器
11         If counter = 10 Then

原文转自:http://www.ltesting.net