| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1870 人关注过本帖
标题:[经验]取20个在10到87之间中的随机整数(不包括10和87)
只看楼主 加入收藏
kx25
Rank: 1
等 级:新手上路
帖 子:31
专家分:0
注 册:2004-11-22
收藏
得分:0 
以下是引用jaychang在2007-5-11 12:30:44的发言:

嗯,做得不错,但是楼主有没有想过这样一个问题,比如我有1-10十个,我要从这十个数里产生随机十个随机数,就是说,产生随机的顺序....这个时候你又怎么做呢?

欢迎交流!

产生随机的顺序??????????

随机数是按生成数值的顺序依次赋值给数组的。。。难道产生随机数的顺序可以倒着来,不贴近现实呀

如果用模块,则窗体部分参考下面:

Private Sub Command1_Click()

调用 = 获取随机整数(1, 10, 10) '获取随机整数(最小值 As Integer, 最大值 As Integer, 数量 As Integer)

List1.Clear

For I = 1 To 10
List1.AddItem 随机整数(I) '默认从 随机整数(1) 开始
Next

End Sub


[此贴子已经被作者于2007-5-12 16:44:52编辑过]


菜鸟在渐渐变老,终有一天会成为老鸟, 并为自由翱翔作最后的准备!
2007-05-12 16:39
jaychang
Rank: 1
等 级:禁止访问
帖 子:148
专家分:0
注 册:2007-5-3
收藏
得分:0 

kx25,你好,

嘿嘿..你的这个方法有没有试过呢?
如果

调用 = 获取随机整数(1, 10, 10)

你会发现运行的时候,CPU占有率会是100%,计算机会很卡,还甚至有可能死机!


http://bbs.    编程GIS论坛
交流软件开发技术与GIS技术
2007-05-12 20:05
kx25
Rank: 1
等 级:新手上路
帖 子:31
专家分:0
注 册:2004-11-22
收藏
得分:0 
以下是引用jaychang在2007-5-12 20:05:50的发言:

kx25,你好,

嘿嘿..你的这个方法有没有试过呢?
如果

调用 = 获取随机整数(1, 10, 10)

你会发现运行的时候,CPU占有率会是100%,计算机会很卡,还甚至有可能死机!

嘿嘿,的确没测试过“有多少个数字,就随机顺序挑出多少个来”。原先只是设想从N个数字中随机挑出部分而已。
根据你的想法,我再次修改了9楼里的模块,测试过了,没再遇到CPU占有率异常高的现象。

[attach]20824[/attach]

[此贴子已经被作者于2007-5-13 17:37:30编辑过]


菜鸟在渐渐变老,终有一天会成为老鸟, 并为自由翱翔作最后的准备!
2007-05-13 07:56
jaychang
Rank: 1
等 级:禁止访问
帖 子:148
专家分:0
注 册:2007-5-3
收藏
得分:0 
不错,有发展前途!

http://bbs.    编程GIS论坛
交流软件开发技术与GIS技术
2007-05-13 10:36
kx25
Rank: 1
等 级:新手上路
帖 子:31
专家分:0
注 册:2004-11-22
收藏
得分:0 

多谢jaychang


菜鸟在渐渐变老,终有一天会成为老鸟, 并为自由翱翔作最后的准备!
2007-05-13 17:58
快速回复:[经验]取20个在10到87之间中的随机整数(不包括10和87)
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.016720 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved