Question

vb输出倒三角形

会考操作题，求用vb打出
*******
*****
***
*
这样的倒三角形

Answer 1

  For i = 4 To 1 Step -1

    Print Space(4 - i); String(i + i - 1, "*")

  Next i

Answer 2

s=""
for i=7 to 1 step -2
    for j=1 to i
        s=s & "*"
    next
    print space((7-i)/2) & s
next