For循环内的条件中断并继续执行

Question

如果循环中的条件为/是真的话，我怎么能打破循环并继续从下一行开始执行。我试过labels和{{1}但它会一直执行不依赖于循环内的条件。 我有以下代码：

GoTo

我曾尝试使用 Dim i As Integer For i = 1 To 50 If i > 35 Then ' break the loop End If Next 它正常工作，有时它默认执行doese不依赖于循环内给出的条件

GoTo

谢谢......

Answer 1

If i > 35 Then
    Exit For
End If

但是，如果lbl:在循环之外，那么使用Goto的代码也会起作用。

Answer 2

您可以使用Exit命令进行此类中断; Exit Sub用于从特定Sub出来，Exit Function将帮助您从函数中发出，在这里您可以使用Exit For因此您的代码将如下所示

Dim i As Integer
For i = 1 To 50
If i > 35 Then
Exit For
End If
Next