VB.Net Tutorial/Statements/Do Loop While

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

Demonstrating the Do/Loop While repetition structure.

<source lang="vbnet">Module Tester

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

End Module</source>

1 2 3 4 5