VB打印简单图形,大家帮帮忙
来源:百度知道 编辑:UC知道 时间:2024/06/22 09:09:48
2个for 打印倒等腰△(里面的任何如下)
5 4 3 2 1 2 3 4 5
4 3 2 1 2 3 4
3 2 1 2 3
2 1 2
1
是倒等腰△,是倒等腰△,是倒等腰△,想了一个下午都没想出
PS 数组不要用,本人还不会````
5 4 3 2 1 2 3 4 5
4 3 2 1 2 3 4
3 2 1 2 3
2 1 2
1
是倒等腰△,是倒等腰△,是倒等腰△,想了一个下午都没想出
PS 数组不要用,本人还不会````
a=Val(InputBox("请输入数字(1-9)"))
For i=a to 1 step -1
For j=1 to a-i
Print " "; '倒等腰的前面空格
Next j
For j=i to 1 step -1
Print j;
Next j
For j=2 to i
Print j;
Next j
Print
Next i