作者Harrychou (Patlabor)
看板Visual_Basic
标题[VB6 ] 回圈次数能再减少?
时间Mon Aug 6 17:14:01 2007
某本书的习作..要求A数值中能被B整除的整数,回圈次数越少越好
想破头只能弄到这样
i = 1
a = Val(InputBox("输入被除数"))
b = Val(InputBox("输入除数"))
While j + b <= a
j = i * b
Print j
i = i + 1
Wend
这样能否再减少回圈的次数?
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 122.116.4.66
1F：推 LPH66:理论上这样写的就很少了 不过这段程式我倒是看了三分钟才懂 08/07 00:16
2F：→ LPH66:一个相同效果的是直接用For (还记得有个东西叫STEP吗?) 08/07 00:17