|
Este artigo foi traduzido por máquina. Coloque o ponteiro do mouse sobre as frases do artigo para ver o texto original. Mais informações.
|
Tradução
Original
|
Declaração Saída (Visual Basic)
Visual Studio 2008
Exit { Do | For | Function | Property | Select | Sub | Try | While }
Sub exitStatementDemo() Dim demoNum As Single ' Set up an infinite loop. Do For i As Integer = 1 To 10000000 demoNum = Int(Rnd() * 100) Select Case demoNum Case 7 : Exit For Case 29 : Exit Do Case 54 : Exit Sub End Select Next i Loop End Sub