Mega Code Archive

 

Categories / VB.Net / Language Basics

 

Goto Statement

Imports System Public Class MainClass     Shared Sub Main(ByVal args As String())        Dim counterVariable As Integer = 0 repeat:  ' the label        Console.WriteLine("counterVariable: {0}", counterVariable)        ' increment the counter        counterVariable += 1        If counterVariable < 10 Then           GoTo repeat ' the dastardly deed        End If     End Sub End Class