Option Strict On
Imports System
Module Module1
Sub Main( )
Dim counterVariable As Integer = 0
repeat:
Console.WriteLine("counterVariable: {0}", counterVariable)
counterVariable += 1
If counterVariable < 10 Then
GoTo repeat
End If
End Sub
End Module
counterVariable: 0
counterVariable: 1
counterVariable: 2
counterVariable: 3
counterVariable: 4
counterVariable: 5
counterVariable: 6
counterVariable: 7
counterVariable: 8
counterVariable: 9