Segi Tiga Siku-siku Ganjil Pada VB.NET 2005 Console Application

Segi Tiga Siku-siku Ganjil Pada VB.NET 2005 Console Application :

Imports system.Console
Module Module1

    Sub Main()
        Dim A, B As Integer
        For A = 1 To 9 Step 2
            For B = 1 To A Step 2
                Write(B & " ")
            Next B
            WriteLine()
        Next A
        WriteLine()
        ReadLine()
    End Sub

End Module

Hasil tampilan :