VB中 用*号表示 金字塔

VB中 用*号表示 金字塔
VB中 用*号表示 金字塔

VB中 用*号表示 金字塔
private sub command1_click
aaa 5
end sub
Sub aaa(n)
For i = 1 To n
Print Spc(n - i); String(2 * i - 1, "*")
Next
End Sub