瑞星卡卡安全论坛
首页
»
技术交流区
»
系统软件
»
【求助】请问在VB6中如何将1~10十个数字随机排列?
HYPERTEXT - 2005-7-30 22:17:00
请告诉我算法,谢谢!!!!!
黑色玫瑰 - 2005-8-11 23:03:00
randomize
for i = 0 to 9 '把0-9放入N()
n(i) = i
next i
for i = 0 to 9
swap n(i),n(int(rnd()*10))'做10次随机交换
next i
不动声色 - 2005-8-13 16:16:00
不懂,讲解下
1
查看完整版本:
【求助】请问在VB6中如何将1~10十个数字随机排列?
© 2000 - 2024 Rising Corp. Ltd.