VB Timer 循环
循环判断质数，每3秒输入一个质数，按“停止”暂停显示。我已将interval设置为3000，循环代码如下：]但运行的时候，过3秒一次性输入了所有10000内的质数。。求高人指教。。Private Sub Timer1_Timer()a = ""For n = 1 To 10000 Step 2 s = ... 展开
其他答案
暂停： Timer1.Enabled = FalseDim m As IntegerPrivate Sub Form_Load()m = 1End SubPrivate Sub Timer1_Timer()a = ""For n = m To 10000 Step 2s = 0For i = 2 To Int(Sqr(n))If n Mod i = 0 Thens = 1Exi 展开
2011-01-18 08:59
来自北京市
赞(0)点赞赞(0)举报
免责声明：问答内容均来源于互联网用户，房天下对其内容不负责任，如有版权或其他问题可以联系房天下进行删除。
