马大哈 发表于 2009-10-23 23:45:22

【分享】马大哈系列功能模块----更好的随机数发生函数,可替代Rnd

VB的RND函数,即使使用了Randomize,也还是有很大的机率产生相同的序列.

我这里收集了超级绿豆的一个模块,使用了系统的加密接口相关API来完成高度随机数的产生,可替代RND取得较好的效果:



示例:

debug.print GenerateRandom(1)(0)         '返回1个字节的随机数,0到255范围内.

jixu2008 发表于 2009-10-29 23:19:49

哇，老马造福人类啊，我做的东西大部分都用到随机数，，比RND好一定要看看并支持一下。

everyone 发表于 2010-6-24 23:19:45

这是好东西!不过不知该代码理论上是否可靠

马大哈 发表于 2010-6-25 00:50:08

这个是系统内认证相关API中的一个,记得有个帖子中解释这个函数工作的方式,是根据调用时的CPU占用,频率,内存占用,以及其它一些涉及硬件与软件的动态状态来作为种子的.

而且经过我实际项目中的应用来看,随机性比较不错.

LittlePig 发表于 2011-2-17 11:14:24

不错，谢谢老马:)

miaomiao 发表于 2011-3-7 12:22:06

{:1_102:}

wlfzsd 发表于 2011-4-2 00:43:32

ljl88900 发表于 2012-3-11 18:32:18

学习

upring 发表于 2015-5-25 20:59:57

这个确实还不错的源代码
页: [1]
查看完整版本: 【分享】马大哈系列功能模块----更好的随机数发生函数,可替代Rnd