VB.Net Do Loop迴圈

當布爾條件為真(True)時，或者直到條件變為真(True)時，它重複執行所包含的語句塊。它可以隨時用Exit Do語句終止。

這個迴圈結構的語法是：

Do { While | Until } condition
    [ statements ]
    [ Continue Do ]
    [ statements ]
    [ Exit Do ]
    [ statements ]
Loop
-- 或者

Do
    [ statements ]
    [ Continue Do ]
    [ statements ]
    [ Exit Do ]
    [ statements ]
Loop { While | Until } condition

流程圖

示例

Module loops
   Sub Main()
      ' local variable definition '
      Dim a As Integer = 10
      'do loop execution
      Do
          Console.WriteLine("value of a: {0}", a)
          a = a + 1
      Loop While (a < 20)
      Console.ReadLine()
   End Sub
End Module

當上面的代碼被編譯並執行時，會產生以下結果：

value of a: 10
value of a: 11
value of a: 12
value of a: 13
value of a: 14
value of a: 15
value of a: 16
value of a: 17
value of a: 18
value of a: 19

如果使用Until語句而不是While語句，那麼程式的行為方式相同：

Module loops
   Sub Main()
      ' local variable definition
      Dim a As Integer = 10
      'do loop execution
      Do
          Console.WriteLine("value of a: {0}", a)
          a = a + 1
      Loop Until (a = 20)
      Console.ReadLine()
   End Sub
End Module

執行上面示例代碼，得到以下結果 -

value of a: 10
value of a: 11
value of a: 12
value of a: 13
value of a: 14
value of a: 15
value of a: 16
value of a: 17
value of a: 18
value of a: 19