问题标题:
VB数字倒金字塔程序输入1-9之间的数字,形成以下倒金字塔7777777777777666666666665555555554444444333332221
问题描述:
VB数字倒金字塔程序输入1-9之间的数字,形成以下倒金字塔
7777777777777
66666666666
555555555
4444444
33333
222
1
刘洪强回答:
PrivateSubCommand1_Click()Dimi,jAsIntegerFori=1To13Forj=1ToiPrint"";NextjForj=iTo13-i+1PrintChr(56-i);NextPrintNextiEndSubVB测试通过!
点击显示
其它推荐