新手求解答EXIT的使用方法

machine6666 · 发表于 2018-6-20 13:52:05

以下是整个代码的一部分，
JJ=3

DO II=1,3

IF( TT(II).GE.TMPSLF.AND.TT(II+1).LE.TMPSLF )THEN

JJ=II

EXIT

ENDIF

ENDDO

上述代码的第5行的EXIT是退出DO文还是退出整个代码？

kyra · 发表于 2018-6-20 13:55:27

本帖最后由 kyra 于 2018-6-20 13:56 编辑

cycle 是退出当前层的本次循环，直接进入当前层的下一次循环。
exit 是退出当前层的循环。
return 是退出当前子程序，返回调用语句的后一句。
stop 是退出整个程序。

machine6666 · 发表于 2018-6-20 15:12:08

非常感谢简单易懂的回答！

[流程控制] 新手求解答EXIT的使用方法