VBA - 退出 Do 循环

当我们希望基于特定条件退出 Do 循环时，我们使用一个 Exit Do 语句。它可同时用在 Do…While 和 Do...Until 循环中。

当执行 Exit Do 时，控制权会立即跳转到 Do 循环之后的下一条语句。

语法

以下是在 VBA 中使用 Exit Do 语句的语法。

 Exit Do

示例

以下示例使用了 Exit Do。如果 Counter 的值达到 10，则将退出 Do 循环，并且控制权会立即跳转到 For 循环之后的下一条语句。

Private Sub Constant_demo_Click()
   i = 0
   Do While i <= 100
      If i > 10 Then
         Exit Do   ' Loop Exits if i>10
      End If
      MsgBox ("The Value of i is : " & i)
      i = i + 2
   Loop
End Sub

当执行以上代码时，它会在消息框中打印以下输出。

The Value of i is : 0

The Value of i is : 2

The Value of i is : 4

The Value of i is : 6

The Value of i is : 8

The Value of i is : 10