跳出循环的语句请教

天地一相

感谢回答。假如有一个10层的嵌套循环，次数很大，核心层有语句M=M+1。当M=100时，需要跳出全部的循环。不能使用EXIT SUB，需要执行其它。目前我使用的是GOTO语句，但有说法GOTO语句是很糟糕的写法，会导致各种问题云云。可我只会这个，让我茫然无措了。请教，是否有简约的其它方法能实现这个跳出全部循环的操作。

小凡、、、

具体代码上个示例e

集装袋

DO语句，for循环，子程序可以解决

micch

就goto吧，不糟糕，换别的说不定更糟糕

wang-way

goto 最快捷  糟糕只是乱写 写糟糕了

天地一相

micch 发表于 2024-6-4 21:34
就goto吧，不糟糕，换别的说不定更糟糕

谢谢，到底使用GOTO怎么就糟糕了，我是一点感知都没有。不过，我早上突然想到不使用GOTO语句的办法了。我之前是一定要跳到循环外执行一 段操作的，这导致我不能使用Exit Sub。早上突然想，核心层判断语句达成时，直接放那段需要执行的代码，然后Exit Sub。这样不就OK了！但测试发现，核心层还是不能放退出EXCCEL进程的语句，不执行。只有GOTO跳转出来才行。我一直想省掉点击关闭文件的那一下操作。

Qs18

for循环用exit for 。do 循环用exit do

lln0618

if M=100 then
exit for
end if

大灰狼1976

跳出多层for循环，又不想用goto的变通方法（我也不喜欢用goto）

1. Sub test()
   
2. For i = 1 To 10
   
3.   For j = 1 To 10
   
4.     For k = 1 To 10
   
5.       If k = 5 Then j = 10: i = 10: Exit For
   
6.     Next k
   
7.   Next j
   
8. Next i
   
9. End Sub

复制代码