VB.Net Tutorial/Statements/Do Loop Until
Using Do/Loop Until repetition structure
Module Tester
Sub Main()
Dim counter As Integer = 1
Do
Console.Write(counter & " ")
counter += 1
Loop Until counter > 5
End Sub
End Module
1 2 3 4 5 "