VB程序:用1、2、3这3个数组成三位数.编写程序,打印出所有的可能(3位数可以相同）,每行输出5个,并统计组成的3位数的个数
<p>问题：VB程序:用1、2、3这3个数组成三位数.编写程序,打印出所有的可能(3位数可以相同）,每行输出5个,并统计组成的3位数的个数<p>答案：↓↓↓<p class="nav-title mt10" style="border-top:1px solid #ccc;padding-top: 10px;">林文坡的回答：<div class="content-b">网友采纳 对不起,今天太忙,上的有点晚了,希望没有让你等太久. PrivateSubForm_Click() Cls DimiAsInteger,jAsInteger,kAsInteger DimnAsInteger Fori=1To3 Forj=1To3 Fork=1To3 n=n+1 Print100*i+10*j+k; IfnMod5=0ThenPrint Next Next Next Print Print"共有";n;"个" Print"点击窗口重新开始..." Print"双击窗口关闭" EndSub PrivateSubForm_DblClick() End EndSub PrivateSubForm_Load() Form1.AutoRedraw=True Print"点击窗口开始..." Print"双击窗口关闭" EndSub 已经运行过.
页:
[1]