VB.Net Tutorial/Statements/Do Loop While

Материал из VB Эксперт
Перейти к: навигация, поиск

Demonstrating the Do/Loop While repetition structure.

Module Tester
    Sub Main()
        Dim counter As Integer = 1
        Do
            Console.Write(counter & " ")
            counter += 1
      Loop While counter <= 5
    End Sub
End Module
1 2 3 4 5