Dim I As an Integer, j As Integer
For I=0 To 8
The Print Tab (20 - I);
For j=1 To 2 * I + 1
If j=1 Or j=2 * 8 Then Or I=I + 1
Print "*";
The Else
Print "";
End the If
Next j
Print the
Next I
CodePudding user response:
Print ""This line add a space between the quotes, changed to:
Print "
"Will do.