Do...Loop语句
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
Do...Loop语句
使用循环语句可以重复执行一组语句,这组语句也称为循环体。循环语句分为三类:一类在条件为False 之前重复执行语句;一类在条件变为True 之前重复执行语句;另一类按照指定的次数重复执行语句。
在VBScript中,可以使用下列循环语句。
∙Do...Loop语句,当(或直到)条件为True时执行循环体。
∙While...Wend语句,当条件为True时执行循环体。
∙For...Next语句,指定循环次数,使用计数器重复执行一组语句。
∙For Each...Next语句,对于集合中的每项或数组中的每个元素,重复执行一组语句。
1、Do While(Until)…Loop
Do While(Until)...Loop语句当条件为True 时或条件变为True 之前重复执行某语句块。根据循环条件出现的位置,Do...Loop语句的语法格式分为两种形式。
在第1种语法格式中,循环条件出现在语句首部,即
Do [{While | Until } <条件> ]
[ <语句列1> ]
[Exit Do]
[ <语句列2> ]
Loop
注解:
∙Do While...Loop是前测型循环语句,当条件为真(True)时执行循环体,条件为假时终止循环体,Do Until...Loop是当条件为假是执行循环体,直到条件为真时终止。
∙"条件"是条件表达式,为循环的条件。其值为True或False。
∙"语句列"是一条或多条命令(即循环体),它们将被重复执行,直到条件变为False或True。
∙"Exit Do"语句将控制权转移到紧接在Loop命令之后的语句。如果Exit Do使用在嵌套的Do...loop语句中,则Exit Do会将控制权转移到Exit Do所在位置的外层循环。可以在Do...Loop 中的任何位置放置任意个Exit Do语句。
2、简单实例1:
Sub btnShow_onClick()
Dim counter,sum
counter=1
sum=0
Do While counter<=100
sum=sum+counter
counter=counter+1
Loop
MsgBox "1+2+3+...+100=" & sum & "。",vbonlyOK+vbInformation,"Do While...Loop语句应用示例"
End Sub
想知道1+2+3+...+100相加起来是多少吗?