Logika (for next goto step) Pada VB.NET 2005 Console Application

Logika (for next goto step) Pada VB.NET 2005 Console Application :

Imports System.Console
Module Module1

    Sub Main()
        Dim i As Integer
        For i = 10 To 1 Step -2
            If i = 5 Then GoTo 100
            Write("PUSING ")
        Next i
100:
        ReadLine()
    End Sub

End Module

Hasilnya :

Selamat Mencoba ^ ^
Bila belum paham dengan menggunakan aplikasi Console vb silahkan lihat di :  Dasar aplikasi vb Console