11 lines
116 B
Text
11 lines
116 B
Text
Public Sub Main()
|
|
Dim i, j As Integer
|
|
|
|
For i = 1 To 5
|
|
For j = 1 To i
|
|
Print "*";
|
|
Next
|
|
Print
|
|
Next
|
|
|
|
End
|