【求教】如何跳出循环

exit for

没仔细看~~话说直接跳出的语句貌似没有，不过你可以添个flag变量~~
Dim flag As Boolean
flag = True
For i = 1 To 100
For j = 1 To 100
For k = 1 To 100
If ...... Then'结束循环的条件
flag = False
Exit For
End If
Next
If Not flag Then Exit For '同时退出外面两层循环
Next
If Not flag Then Exit For
Next


orz 度娘再一次把我完美的缩进吃掉了

好结构，

用GoTo不是很好吗？

结构化编程要求尽量少用或不用goto 清晰第一，效率第二~~
更有甚者在NOIP,noi等信息学竞赛中，goto语句是被绝对禁止的！~~

sub xxx
for
for
for
if xxx then exit sub
nmect
nrcfy
nrcyt
end sub
....卡得很 懒得改错了

好结构