VB中用循环语句 for 。。next 怎么实现数字金字塔》？

时间：2014.01.17 发布人：hihzay
VB中用循环语句 for 。。next 怎么实现数字金字塔》？

已解决问题

谷歌hihzay用户在2014.01.17提交了关于“托业VB中用循环语句 for 。。next 怎么实现数字金字塔》？”的提问，欢迎大家涌跃发表自己的观点。目前共有1个回答，最后更新于2024-09-14T06:31:47。希望大家能够帮助她。

详细问题描述及疑问：期待您的答案，你就是当代的活雷锋,太感谢了 ！

希望以下的回答，能够帮助你。

第1个回答

用户名：meme_xiong  

'前面加空格，改成这样：
PrivateSubCommand1_Click()
DimIAsLong,nStrAsString,SAsLong
S=4'显示的最大数字，可修改
Me.Cls:Me.AutoRed来自raw=True
ForI=1331215问答ToS
nStr=String(S-I,"")&String((I-1)*2+1,I&"")
Me.PrintnStr
Next
ForI=S-1To1Step-1
nStr=String(S-I,"")&String((I-1)*2+1,I&"")
Me.PrintnStr
Next
EndSub