VB.Net Tutorial/Statements/Do Loop Until

Материал из VB Эксперт
Версия от 12:53, 26 мая 2010; Admin (обсуждение | вклад) (1 версия)
(разн.) ← Предыдущая | Текущая версия (разн.) | Следующая → (разн.)
Перейти к: навигация, поиск

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 "