如何在不转到下一步的情况下退出 For 循环

Question

我的代码中有一个包含 If Else 语句的 For 循环。当 If 语句为真时，我想退出整个 For 循环。将不再需要遍历范围的其余部分。 “退出”是否适合这个？

我正在查看 Microsoft 网站上的 Exit 语句，根据他们的说法，Exit For 继续执行 Next 语句之后的语句。如果这是真的，Exit For 将不起作用。我想继续执行 Next 命令。

我可以花时间使用数字计数器或其他东西来测试它，但我宁愿得到一个快速的答案，因为我相信这对这里的大多数人来说都是显而易见的。谢谢！

Answer 1

是的，你可以。使用：

Sub test()

Dim x As Integer
For x = 1 To 10

    If x = 2 Then
        Debug.Print "here"
        Exit For
    Else
        Debug.Print x
    End If

Next x

End Sub

我明白了：

1
here

还有这个：

Sub test4()

Dim x As Integer
For x = 1 To 10

    If x = 2 Then
        Debug.Print "here"
        Exit For
    Else
        Debug.Print x
    End If

Debug.Print "testing"

Next x

End Sub

我明白了：

 1 
testing
here

还有这个：

Sub test4()

Dim x As Integer
For x = 1 To 10

    If x = 2 Then
        Debug.Print "here"
        Exit For
        Debug.Print "after here"
    Else
        Debug.Print x
    End If

Debug.Print "testing"

Next x

End Sub

你得到：

 1 
testing
here