8月hello我是价值网陈慧来为大家解答以上问题,vb语言随机产生随机数,VB随机取数怎么做很多人还不知道,现在让我们一起来看看吧!
只要在代码中使用随机函数即可实现随机抽取功能
一、vb随机数生成的方法
vb随机数生成函数是Rnd[(number)],number参数为可选项。在调用Rnd生成随机数之前,先使用Randomize初始化随机数生成器来产生种子,该生成器是根据系统计时器来产生种子的。
1、生成100以内的随机数
Randomize
Int(Rnd()*100)//生成0-99之间的随机数
Int(Rnd()*101)//生成0-100之间的随机数
2、生成指定范围随机数
由于vb没有提供直接生成指定范围随机数的函数,所以要把Rnd变通一下,方法如下:
Int((上限-下限+1)*Rnd+下限)
把它封装成可直接调用的函数如下:
FunctionGetRandom(under,overAsInteger)AsInteger
Ifunder<overThen
temp=under
under=over
over=temp
EndIf
Randomize
GetRandom=Int((under-over+1)*Rnd+over)
EndFunction
调用方法:
GetRandom(10,100)//生成10到100的随机数
二、vb.net生成随机数的方法
1、方法:Random.Next(intminValue,intmaxValue)
2、说明:
若minValue和maxValue都没有提供,则生成一个0-2147483647之间的随机数
若minValue和maxValue只提供一个,则生成一个0-maxValue之间的随机数
若minValue和maxValue两个都提供,则生成一个minValue-maxValue之间的随机数
3、举例
Dimran=NewSystem.Random()
ran.Next()//生成0-2147483647之间的随机数
ran.Next(100)//生成0-100之间的随机数
ran.Next(10,100)//生成10-100之间的随机数
Dimran=NewRandom(DateTime.Now.Millisecond)//通过日期的微秒生成随机数
本文到此结束,希望对大家有所帮助。