解答vb题

Forx=5To1Step-1ForY=1To6-xPrintTab(Y+5);"*"NextPrintNext程序运行的结果是什么需要详细过程,主要是对上面的不太懂什么... For x = 5 To 1 Step -1
For Y=1 To 6-x
Print Tab(Y+5);" * "
Next
Print
Next
程序运行的结果是什么
需要详细过程,主要是对上面的不太懂什么意思
展开
 我来答
Dou要听话
2010-09-15 · TA获得超过372个赞
知道小有建树答主
回答量:313
采纳率:0%
帮助的人:237万
展开全部

双重for循环  内层循环就是tab()难理解一点吧?

例:print tab(5);"*"就是在当前输出行的最前面开始数,在第5个位置上输出*。

x=5,y=1 to 1 

y=1 print tab(6);"*"    '第6位上输出*   并回车

print                   '空行

x=4,y=1 to 2

y=1 print tab(6);"*"    '第6位上输出*   并回车

y=2 print tab(7);"*"    '第7位上输出*   并回车

print 

……

liuyuwxj
2010-09-15 · TA获得超过2.6万个赞
知道大有可为答主
回答量:1777
采纳率:100%
帮助的人:1525万
展开全部
Tab[(n)] 可选的 n 参数是在显示或打印列表中的下一个表达式之前移动的列数。

Private Sub Command1_Click()
For x = 5 To 1 Step -1 'x的值从5递减到1,每次递减1
For y = 1 To 6 - x 'y的值从1递增到6-x,因为x的值是5 4 3 2 1,所以y的值是从1递增到1 2 3 4 5
Print Tab(y + 5); "*" '意思就是输出y+5个空格后接着输出*,认真代入y值即可得出结果
Next
Print 'y循环完毕即输出一空行。
Next
End Sub
'当x=5时,y=1,所以输出6个空格加*;
' *

'当x=4时,y=1,所以输出6个空格加*;
' y=2,所以输出7个空格加*;
' *
' *

'当x=3时,y=1,所以输出6个空格加*;
' y=2,所以输出7个空格加*;
' y=3,所以输出8个空格加*;
' *
' *
' *

'当x=2时,y=1,所以输出6个空格加*;
' y=2,所以输出7个空格加*;
' y=3,所以输出8个空格加*;
' y=4,所以输出9个空格加*;
' *
' *
' *
' *

'当x=1时,y=1,所以输出6个空格加*;
' y=2,所以输出7个空格加*;
' y=3,所以输出8个空格加*;
' y=4,所以输出9个空格加*;
' y=5,所以输出10个空格加*;
' *
' *
' *
' *
' *
来自:求助得到的回答
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
japto
2010-09-15 · TA获得超过961个赞
知道小有建树答主
回答量:457
采纳率:0%
帮助的人:307万
展开全部
结果如下:
*

*
*

*
*
*

*
*
*
*

*
*
*
*
*

执行过程:
外层循环第一次
x=5
执行内循环
For y=1 to 6-5
打印 Tab(Y+5)=Tab(6),即右移动6个制表符的位置,再打印“ * ”
next
每次内循环结束后,打印一个空行【Print】

外层循环第二次(Step-1)
x=4
......
一次类推,得出以上结果。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式