Visual Basic .NET Do...Loop
示例
使用Do...Loop重复的语句块While或Until条件为真，一开始或在循环的末尾或者检查条件。
Dim x As Integer = 0
Do
Console.Write(x & " ")
x += 1
Loop While x < 10要么
Dim x As Integer = 0
Do While x < 10
Console.Write(x & " ")
x += 1
Loop0123456789
Dim x As Integer = 0
Do
Console.Write(x & " ")
x += 1
Loop Until x = 10要么
Dim x As Integer = 0
Do Until x = 10
Console.Write(x & " ")
x += 1
Loop0123456789
ContinueDo可用于跳到循环的下一个迭代：
Dim x As Integer = 0
Do While x < 10
x += 1
If x Mod 2 = 0 Then
Continue Do
End If
Console.Write(x & " ")
Loop13579
您可以使用ExitDo-终止循环-请注意，在此示例中，缺少任何条件都会导致无限循环：
Dim x As Integer = 0
Do
Console.Write(x & " ")
x += 1
If x = 10 Then
Exit Do
End If
Loop0123456789