mtwm.net
当前位置:首页 >> vB随机种子 >>

vB随机种子

你的问题说明的不够详细,到底是下面哪个区间呢?[60,100],[60,100),(60,100],(60,100) 也没说明是要整数还是小数,要知道上述两条决定了vb表达式的写法. 生成随机小数利用rnd函数 rnd能够随机生成 [0,1俯发碘菏鄢孤碉酞冬喀)区间的小数 例如:生成[60,100)区间的小数的表示方法是 rnd*40+60 生成[60,100]区间的整数的表示方法是 int(rnd*41+60),其中int是取整函数,如int(3.5)等于3,没有四舍五入单纯取整数位.

VB的随机数即使用Rnd函数生成的随机数值.种子,为初始值,用来生成伪随机数字.

rnd(0.2)*100mod100 产生100内的数再除以100的余数

int()函数是取整数部分,直接舍弃小数部分,取小于对象的数值;rnd 是开区间 (0 ,1);所以,rnd*50 为(0,50),rnd*50+10 为(10,60),显然这个区间都是大于10而小于60的数,int取小于这些数的整数,显然下限为10,上限为59.随便取个数就了解了.

没能看得很明白,大概你要的是这样了?Sub sj()temp = Int(Rnd() * 10000000) Mod Int(Rnd() * 10)MsgBox (temp)End Sub

vb 里面的随机数就是RND如果您说的是初始化随机数,那就是Randomize先用Randomize初始化,再调用RND

Randomize 是初始化随机函数种子用的Rnd 是随机数函数.-----如果没有Randomize ,那么Rnd因为种子是一样的,所以产生的随机数序列每次都是一样的.(你每次重新启动程序会发觉Rnd产生的是一样的数)有Randomize ,那么每次种子都

其实很简单的.你可以测试一下,用rnd这个函数每次实现的随机并不是真正的随机数字,比如第一次产生一个1,2,4,5这个序列.第二次也会产生1,2,4,5这个序列,后面每次都会得

Private Sub Command1_Click() Dim flag As Boolean Dim r(1000) Dim d As String Randomize '初始化随机种子 For i = 0 To 10 '出11个100以内的不重复数 Do r(i) = Int(Rnd() * (100)) flag = True For j = 0 To (i - 1) If r(j) = r(i) Then flag = False '如果用

Randomize 用 number 将 Rnd 函数的随机数生成器初始化,该随机数生成器给 number 一个新的种子值.如果省略 number,则用系统计时器返回的值作为新的种子值. 如果没有使用 Randomize,则(无参数的)Rnd 函数使用第一次调用 Rnd 函数的种子值. 注意 若想得到重复的随机数序列,在使用具有数值参数的 Randomize 之前直接调用具有负参数值的 Rnd.使用具有同样 number 值的 Randomize 是不会得到重复的随机数序列的.

网站首页 | 网站地图
All rights reserved Powered by www.mtwm.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com