如何产生真正的随机函数?

 更新时间:2007年03月08日 00:00:00   作者:  
//MSDN 
Randomize

为了生成某个范围内的随机整数,可使用以下公式:Int((upperbound - lowerbound + 1) * Rnd + lowerbound) 

这里,upperbound 是随机数范围的上限,而 lowerbound 则是随机数范围的下限。 


---- 在VB中的随机函数是Rnd,但在使用的过程中发现,虽然程序启动后产生的数值是随机的,但对于每次重新启动,程序都会产生相同的随机数序列,应该怎样解决? 

----VB中随机函数的原形是: Rnd(number),Rnd函数返回小于1但大于或等于0的值。number (可选项)的值决定了Rnd生成随机数的方式。由于生成随机数方式的确定,导致了每次新启动随机函数,最初给定的种子都会生成相同的数列,因为每一次调用Rnd函数都用数列中的前一个数作为下一个数的种子。 

----为了每次运行程序调用随机函数都会有不同的随机数序列,在调用Rnd之前,先使用无参数的Randomize语句初始化随机数生成器,该生成器具有根据系统计时器得到的种子,这样再调用Rnd就会得到不同的随机数序列了。 

----另外,根据Randomize的工作原理,用户也可以编制自己的随机函数,即利用函数Timer得到从午夜开始到现在经过的秒数,然后再根据要得到的随机数值大小对该数值进行“衰减”处理,这样得到的数值则可称得上是真正意义的随机数值。

相关文章

  • 使用WMI得到计算机的信息

    使用WMI得到计算机的信息

    WMI是一项行业推荐规范,旨在为访问企业环境中的管理信息而开发一种标准化技术。该信息包括系统内存的状态、当前安装的客户应用程序清单,以及有关客户端状态的其他数据
    2019-04-04
  • VB实现禁用任务管理器的方法

    VB实现禁用任务管理器的方法

    本文给大家介绍的是使用VB来实现禁用任务管理器的方法和示例,十分的简单实用,有需要的小伙伴可以参考下。
    2015-06-06
  • VB中判断空的几种方法(Null, Missing, Empty, Nothing, vbNullString)

    VB中判断空的几种方法(Null, Missing, Empty, Nothing,&nb

    本文主要介绍了VB中判断空的几种方法,包含Null, Missing, Empty, Nothing, vbNullString这几张,你知道它们的区别吗,下面就一起来介绍一下
    2024-04-04
  • VB6实现连接Access数据库的ADODB代码实现方法

    VB6实现连接Access数据库的ADODB代码实现方法

    这篇文章主要介绍了VB6实现连接Access数据库的ADODB代码实现方法,对于初学者掌握VB链接access数据库有着很好的借鉴价值,需要的朋友可以参考下
    2014-07-07
  • VB实现按行读取文本文件的方法

    VB实现按行读取文本文件的方法

    这篇文章主要介绍了VB实现按行读取文本文件的方法,涉及使用VB操作文件读取的相关技巧,需要的朋友可以参考下
    2015-06-06
  • Basic求10000以内的完美数

    Basic求10000以内的完美数

    一个数的所有真因数加起来正好等于这个自然数本身,在数学上,具有这种性质的自然数叫做完全数。关键是求出该自然数k的所有因子。如果k%i为0,则i为k的因子,用循环语句求出k 的所有真因子(1<=i<=k/2),把它们求和,看是否等于k来判断。
    2015-05-05
  • VB关机恶搞小程序

    VB关机恶搞小程序

    本文给大家汇总了一些使用VB实现的关机恶搞小程序,大家娱乐一下就行了,千万别做坏事哦
    2015-09-09
  • VB实现屏蔽文本框右键菜单的复制、粘贴等功能的方法

    VB实现屏蔽文本框右键菜单的复制、粘贴等功能的方法

    这篇文章主要介绍了VB实现屏蔽文本框右键菜单的复制、粘贴等功能,是非常实用的一个功能,需要的朋友可以参考下
    2014-07-07
  • VB语言使用ADO连接、操作SQLServer数据库教程

    VB语言使用ADO连接、操作SQLServer数据库教程

    这篇文章主要介绍了VB语言使用ADO连接、操作SQLServer数据库教程,本文讲解详细、代码中有大量注释,是非常好的一篇教程,需要的朋友可以参考下
    2014-08-08
  • VBA中连接SQLSERVER数据库例子

    VBA中连接SQLSERVER数据库例子

    这篇文章主要介绍了VBA中连接SQLSERVER数据库例子,VBA是指Visual Basic for Applications,是Visual Basic的一种宏语言,需要的朋友可以参考下
    2014-07-07

最新评论