Source Code Jajar Genjang Pada VB.NET 2005 Console Application

Source Code Jajar Genjang Pada VB.NET 2005 Console Application :

Imports System.Console
Module Module1

    Sub Main()
        Dim A, B, C As Integer
        For A = 1 To 10
            For C = 1 To A
                Write(" ")
            Next C
            For B = 1 To 10
                Write("A")
            Next B
            WriteLine()
        Next A
        ReadLine()
    End Sub

End Module

Hasil Tampilannya :