作者md965088 (屁股狂冒烟)
看板Visual_Basic
标题[VB6 ] 如何保留下随机选出的每组数据
时间Thu Jul 30 09:56:46 2009
For intCounter = 1 To 100
Randomize
number = Int(Rnd * (1000) + 1)
Next
---------------------------------------------
以上的程式码是我想从1到1000之间 随机产生数字一百次 所以会有一百组数据
我如何让电脑在整个结束for next结束时 仍然能记忆这一百组数据
因为我要在後面的程式码用到这一百组数据 但发现我每次得到的number
只有一组(就是跑到第一百次产生的最後一组数据)
不知道版上的大大们能否指点迷津 谢谢QQ
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.135.73.136
1F:推 Sdany:dim number(99) , number(intCounter-1) = int(rnd.... 07/30 10:02
2F:推 Sdany:这是很基本的,用阵列去跑即可 07/30 10:48
3F:推 jwjeng:Randomize丢到For上面去比较好吧? 07/30 11:29