退出Do...Loop 您可以通过 Exit Do 关键词退出 Do...Loop 语句。 Do Until i=10 i=i-1 If i<10 Then Exit Do Loop 这个循环内的代码,只要i不为 10 且i大于 10 时都将被执行。 更多实例(仅适用于 IE) 循环遍历标题 如何循环遍历 html 中的六个标题。 Do...While loop 如何做一个简单的Do...While循环。
For...Next 语句 - 运行一段代码指定的次数 For Each...Next 语句 - 针对集合中的每个项目或者数组中的每个元素来运行某段代码 Do...Loop 语句 - 运行循环,当条件为 true 或者直到条件为 true 时 While...Wend 语句 - 不要使用这个语句 - 请使用 Do...Loop 语句代替它...
Sub ExitExample() Dim counter, myNum counter = 0 myNum = 9 Do Until myNum = 10 myNum = myNum - 1 counter = counter + 1 If myNum < 10 Then Exit Do Loop MsgBox "循环重复了 " & counter & " 次。" End Sub 使用While...Wend ...
Sub ExitExample() Dim counter, myNum counter = 0 myNum = 9 Do Until myNum = 10 myNum = myNum - 1 counter = counter + 1 If myNum < 10 Then Exit Do Loop MsgBox "循环重复了" & counter & "次。"End Sub 使用While...Wend While...Wend语句是为那些熟悉其用法的用户提供的。但是由于...
Loop 如果i 等于 10,上述循环内的代码将终止执行。 Do some code Loop Until i=10 这个循环内的代码将被执行至少一次,即使 i 等于 10。 退出Do...Loop 您可以通过 Exit Do 关键词退出 Do...Loop 语句。 Do Until i=10 i=i-1 If i<10 Then Exit Do ...
第三种Do Until循环经常被误认为是Do While的反义词,其实它俩的关系就像”继续吃饭直到吃饱”和”只要没吃饱就继续吃”的区别。举个例子,处理用户输入时: Do Until inputValue = “exit” inputValue = InputBox(“请输入指令”) Loop 这时候要特别注意循环体内的条件会不会被意外修改。有次我在项目里看到有人...
do…loop:当(或直到)条件为true是循环,退出循环用exit do while…wend:当条件为true时循环,while循环没有退出语句 for…next:指定循环次数,使计数器重复运行语句,退出for语句用exit for。默认计数器每次加1,但可以用step关键字指定每次循环计数器增加的值。
Do While condition ' 循环体 Loop Do Until condition ' 循环体 Loop ' 或者带有退出条件的循环 Dim exitLoop: exitLoop = False Do ' 循环体 If someCondition Then exitLoop = True Loop While Not exitLoop 7. 过程和函数 Sub 过程:不返回值的过程。 Sub MyProcedure() ' 过程代码 End Sub Functi...
[exit do] ‘这是用于在特定条件下退出循环 [命令2] Loop While<条件> 两者区别:第一个格式是条件满足时才执行接着的语句,第二个格式是先执行一次然后才根据条件判断是否继续执行接下来的语句。 (演示VBScript_third.asp的代码) 直到型循环语句: (1)、do until<条件> [命令1] [exit do] [命令2] Loop ...
1038 800A040E 'loop' 没有 'do' 1039 800A040F 无效 'exit' 语句 1040 800A0410 无效 'for' 循环控制变量 1041 800A0411 名称重定义 1042 800A0412 必须为行的第一个语句 1043 800A0413 不能赋给非Byval参数 1044 800A0414 调用 Sub 时不能使用圆括号 ...