要从For…Next循环中退出循环，应使用啥语句。

Posted 2023-05-18

fori＝1to15；

printi；

ifi＝10then；

exitfor＇退出For循环；

endif；

next；

在不少实际问题中有许多具有规律性的重复操作，因此在程序中就需要重复执行某些语句。一组被重复执行的语句称之为循环体，能否继续重复，决定循环的终止条件。

在程序中，for语句小括号内的三个表达式分别为：n=1;n<=200;n++。表达式1,n=1是给n赋初值，表达式2是关系表达式,n小于等于200时，表达式都为真，则执行循环体内的语句nu+=n；

（即nu＝nu＋n；），然后执行表达式3（n＋＋），进入下一轮循环；若n大于200时，表达式2为假，则终止循环，执行printf（）语句，在屏幕上打印出：nu＝20100。

参考技术A for i = 1 to 15
print i
if i= 10 then
exit for'退出For循环
end if
next 参考技术B 在要退出的地方加入：
EXIT FOR
语句 参考技术C Dim I , X
For I = 1 to 90 '90次后自动退出
Static CiShu '次数
Cishu = Cishu + 1
If Cishu >= X Then Goto Newewe

Next
Newewe:

他们说的EXIT FOR不行，但是可以用Goto，格式：
Goto xxxxx

xxxxx:
其中“xxxxx”表示行号，可以是字母、汉字，但是数字只能在末尾。
运行到“Goto”时变跳到“xxxxx”（千万别忘了冒号啊！） 参考技术D EXIT FOR

vba中五种循环语句的区别

vba中五种循环语句的区别

参考技术A 1、For
……Next
语句，适用于顺序操作
例1.在立即窗口输出1到100
For
n=1
to
100
'从1到100
，执行下行代码
debug.Print
n
next
n
2、For……Each……Next语句，适用于集合的操作
例2.输出指定单元格区域所有单元格的内容
For
Each
Cell
in
myRange
'遍历区域内的所有单元格
debug.Print
Cell.Value
next
Cell
3、Do
While
条件
……Loop
语句。
例3、在立即窗口输出1到100
n=0
Do
While
n<=100'当n小于等于100时
，执行下行代码，否则退出
n=n
1
Debug.Print
n
Loop
4、While
条件……
Wend
语句。
例4、在立即窗口输出1到100
n=0
While
n<=100'当n小于等于100时
，执行下行代码，否则退出
n=n
1
Debug.Print
n
Wend
5、Do
……Loop
Until
条件
语句。
例5、在立即窗口输出1到100
n=0
Do
'执行下行代码
n=n
1
Debug.Print
n
Loop
Until
n
>100
‘当n大于100时退出循环
6、Do
……Loop
While
语句
，鬼老的思维真是最诡异，把While放在Loop后面却不是退出循环的条件，而是继续执行循环的条件。真令汉语思维费解。
例6、在立即窗口输出1到100
n=0
Do
'执行下行代码
n=n
1
Debug.Print
n
Loop
While
n
<=100
‘当n小于等于100时
，继续执行循环。