VB6.0中随机种子Randomize的运用
VB6.0中的Rnd函数可以产生0到1之间的数(0,1),我们可以用这个函数来模拟福利彩票号码的产生,但是在操作过程中,每次产生的号码序列都相同,接下来就介绍如何用随机种子Randomize避免这一现象。
操作方法
(01)打开VB6.0软件,新建一个工程,在窗体中添加一个Label控件,并将其名字改为“Lbl1”.
(02)双击窗体,进入代码编写窗口,在窗体的Form_Load事件中输入以下代码:Private Sub Form_Load()Dim a As Integer, i As Integerx27;RandomizeFor i = 1 To 10a = Int(Rnd * 90) + ion = ion & " " & aNext iEnd Sub
(03)关闭代码编辑窗口,按下F5键,运行刚刚输入的代码。结果Label控件中生成了10个随机数。记下这几个随机数,然后单击窗体关闭按钮,退出程序运行。
(04)再次按下F5键运行程序,发现Label控件中产生10个随机数与上次记下的一模一样,这不是我们想要的结果(福彩号码每次下注号码不一样)。
(05)双击窗体,进入代码编写窗口,在窗体的Form_Load事件做如下修改:将语句'Randomize的注释符号分号(')去掉。
(06)然后按F5再次运行程序,产生的随机数序列如图所示,与上次产生的随机数不同了,这样就达到了每次产生的随机数序列不同的效果。
特别提示
要用RND函数产生不同随机数,必须配合随机种子Randomize一起使用。
随机种子Randomize必须放在RND函数之前,控制RND函数随机数的产生。
-
stdole32.tlb丢失或损坏怎么办
Excel是我们办公时候最常用的办公软件之一,但是有些win7专业版用户在使用Excel的过程中出现了“某个对象程序库丢失或损坏”的警告,这究竟是怎么回事呢?虽然有这个错误提示,但是Excel大部分功能还是可以正常使用的。下面由小编给大家介绍一下丢失或损坏的解决方法...
-
Excel中身份证号计算年龄公式是什么
Excel是一款电子表格软件,直观的界面、出色的计算功能和图表工具,再加上成功的市场营销,使Excel成为最流行的个人计算机数据处理软件。那么EXCEL中身份证号计算年龄公式是什么呢,下面我们就来了解一下。操作方法(01)在单元格中输入“=2018-MID(D4,7,)”。(02)D4表示身份证...
-
显卡位宽有哪些,有什么区别
为了更好的兼容,更好的DIY,我们需要了解一下显卡的位宽有哪些,有什么区别。操作方法(01)显卡位宽,主流有128bit还有64bit、128bit、256bit,显存的位宽越高,显卡的性能也就越好。(02)主流显卡采用128bit位宽,128位的显存能够适应大多数游戏。(03)显存的带宽=显存频率*显存位...
-
如何使用QQ云盘呢?怎么使用微云呢?
现在云盘比较流行,随着网络的发展,以前的U盘现在逐步减少,网络云盘可以通过网络盘帮我们保存资料,不需要再随身携带U盘了。下面和大家谈下如何使用qq云盘?操作方法(01)在电脑上登录QQ。(02)点击微云图标进入微云。(03)日常笔记可以在“笔记”栏打开,然后点击新建一个文件。...