VBA do...until循環

Do..Until循環使用於當需要重複一組語句，只到條件爲假。所述條件可在循環開始或在循環結束時進行檢查。

語法:

VBA的Do..Until循環的語法是：

Do Until condition [statement 1] [statement 2] ... [statement n] [Exit Do] [statement 1] [statement 2] ... [statement n] Loop

流程圖

示例:

下面的示例使用Do..Until循環來檢查條件在循環的開始。循環內的語句執行只有在條件爲假時。當條件爲真時循環退出。

Private Sub Constant_demo_Click() i=10 Do Until i>15 'Condition is False.Hence loop will be executed
i = i + 1
msgbox ("The value of i is : " & i)
Loop
End Sub

在執行上面的代碼，它打印在消息框中下面的輸出。

The value of i is : 11

The value of i is : 12

The value of i is : 13

The value of i is : 14

The value of i is : 15

The value of i is : 16

替代語法：

此外，還有一個備用的語法Do..Until環路檢查條件在循環的結束。這兩種語法之間的主要區別，用一個例子說明如下。

Do [statement 1] [statement 2] ... [statement n] [Exit Do] [statement 1] [statement 2] ... [statement n] Loop Until condition

流程圖

例如：

下面的示例使用Do..Until循環來檢查條件在循環的結束。循環內的語句執行atleast一次，即在條件爲真時。

Private Sub Constant_demo_Click() i=10 Do i = i + 1 msgbox "The value of i is : " & i Loop Until i<15 'Condition is True.Hence loop is executed once.
End Sub

在執行上面的代碼，它打印在消息框中下面的輸出。

The value of i is : 11