VB.Net/Language Basics/While

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

Exit from While Loop

<source lang="vbnet"> Imports System Public Class MainClass

   Shared Sub Main(ByVal args As String())
     Dim counter As Integer
     While counter <= 10
        " skip remaining code in loop only if counter = 7
        If counter = 7 Then
           Exit While
        End If
        counter += 1
     End While
     Console.WriteLine( "counter = " & counter & _
        " after exiting While structure")
   End Sub

End Class

      </source>