Segitiga Siku-siku Pada VB.NET 2005 Console Application

Segitiga Siku-siku Pada VB.NET 2005 Console Application :

Imports system.console
Module Module1

    Sub Main()
        Dim bil, k As Integer
        For bil = 1 To 10
            For k = 1 To bil
                Write("*")
            Next k
            WriteLine()
        Next bil
        WriteLine()
        ReadLine()
    End Sub

End Module

Hasilnya :