计算机编程VB循环结构 20
Fori=3To1Step-1PrintSpc(5-i);Forj=1To2*i-1Print"*";NextjPrintNexti求每一句的解释,谢谢!...
For i = 3 To 1 Step -1
Print Spc(5-i);
For j = 1 To 2*i - 1
Print"*";
Next j
Print
Next i
求每一句的解释,谢谢! 展开
Print Spc(5-i);
For j = 1 To 2*i - 1
Print"*";
Next j
Next i
求每一句的解释,谢谢! 展开
展开全部
For i = 3 To 1 Step -1 'i值从3减少到1,每次减少1
Print Spc(5-i); '打印5-i个空格,不换行
For j = 1 To 2*i - 1 'j值从1增加到(2*i-1),每次增加1
Print"*"; '打印1个*,不换行
Next j '下一个j(1过后是2,2过后是3,……,2*i-1过后是2*i,然后循环结束)
Print '换行
Next i '下一个i(3过后是2,2过后是1,1过后是0,然后循环结束)
Print Spc(5-i); '打印5-i个空格,不换行
For j = 1 To 2*i - 1 'j值从1增加到(2*i-1),每次增加1
Print"*"; '打印1个*,不换行
Next j '下一个j(1过后是2,2过后是3,……,2*i-1过后是2*i,然后循环结束)
Print '换行
Next i '下一个i(3过后是2,2过后是1,1过后是0,然后循环结束)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
command12_click()
c
=
label1.caption
label1.caption
=
val(a)
+
val(b)
end
sub
a
和b有值吗?计算器程序吧,是不是太麻烦点了。0-9设个按键组,按+,-,*,\要记住是第一个数,往下是第二个数并进行运算。
c
=
label1.caption
label1.caption
=
val(a)
+
val(b)
end
sub
a
和b有值吗?计算器程序吧,是不是太麻烦点了。0-9设个按键组,按+,-,*,\要记住是第一个数,往下是第二个数并进行运算。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
For i = 3 To 1 Step -1--------循环i递减,从3递减到1,每次减1
Print Spc(5-i); ---------------Spc 函数确定输出位置
For j = 1 To 2*i - 1 -----循环内的嵌套循环,循环范围为1到2*i - 1 ,(2*i - 1 为计算公式)
Print"*";---------------打印*
Next j------------------for next循环(固定格式),此作用于内部循环j
Print--------------------print打印命令
Next i------------------for next循环(固定格式),此处作用于主循环i
Print Spc(5-i); ---------------Spc 函数确定输出位置
For j = 1 To 2*i - 1 -----循环内的嵌套循环,循环范围为1到2*i - 1 ,(2*i - 1 为计算公式)
Print"*";---------------打印*
Next j------------------for next循环(固定格式),此作用于内部循环j
Print--------------------print打印命令
Next i------------------for next循环(固定格式),此处作用于主循环i
追问
请问如何通过i和j来确定*的位置?
追答
用i的给j提供参数,最终通过j计算*的位置
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |