vb如何随机抽数比如在100至200之间随机选择一个整数显示在下方。求详细解答,谢谢!

vb如何随机抽数比如在100至200之间随机选择一个整数显示在下方。求详细解答,谢谢!,第1张

Int((upperbound - lowerbound + 1) Rnd + lowerbound)

upperbound是从右边框中得到的数

lowerbound是从左边框中得到的数(或是先把两数得到,再分个大小)

Rnd 函数

返回一个包含随机数值的 Single。

语法原型

Rnd[(number)]

可选的 number 参数是 Single 或任何有效的数值表达式。

返回值

如果 number 的值是 Rnd 生成

小于 0 每次都使用 number 作为随机数种子得到的相同结果。

大于 0 序列中的下一个随机数。

等于 0 最近生成的数。

省略 序列中的下一个随机数。

说明

Rnd 函数返回小于 1 但大于或等于 0 的值。

number 的值决定了 Rnd 生成随机数的方式。

对最初给定的种子都会生成相同的数列,因为每一次调用 Rnd 函数都用数列中的前一个数作为下一个数的种子。

在调用 Rnd 之前,先使用无参数的 Randomize 语句初始化随机数生成器,该生成器具有根据系统计时器得到的种子。

为了生成某个范围内的随机整数,可使用以下公式:

Int((upperbound - lowerbound + 1) Rnd + lowerbound)

rnd

函数

返回一个包含随机数值的

single。

语法

rnd[(number)]

可选的

number

参数是

single

或任何有效的数值表达式。

返回值

如果

number

的值是

rnd

生成

小于

0

每次都使用

number

作为随机数种子得到的相同结果。

大于

0

序列中的下一个随机数。

等于

0

最近生成的数。

省略

序列中的下一个随机数。

说明

rnd

函数返回小于

1

但大于或等于

0

的值。

number

的值决定了

rnd

生成随机数的方式。

对最初给定的种子都会生成相同的数列,因为每一次调用

rnd

函数都用数列中的前一个数作为下一个数的种子。

在调用

rnd

之前,先使用无参数的

randomize

语句初始化随机数生成器,该生成器具有根据系统计时器得到的种子。

为了生成某个范围内的随机整数,可使用以下公式:

int((upperbound

-

lowerbound

+

1)

rnd

+

lowerbound)

这里,upperbound

是随机数范围的上限,而

lowerbound

则是随机数范围的下限。

注意

若想得到重复的随机数序列,在使用具有数值参数的

randomize

之前直接调用具有负参数值的

rnd。使用具有同样

number

值的

randomize

是不会得到重复的随机数序列的。

rnd()函数返回大于等于0小于1的数,要得到3位数也就是数字在100-999之间,可以这样得到:

int(rnd()900 + 100)

rnd()900可以得到0-899的数,加上100就得到100-999之间的数了

公式:

rnd()(数字上限-数字下限+1) + 数字下限

另外在使用rnd前用randomize初始化随机数种子就可以避免每次输出相同值

代码及注释如下:

Private Sub Command1_Click()'点击命令按钮执行程序

Randomize'初始化随机数发生器

x = Round((Rnd() 9), 0)'先利用随机数得到0-1区间的小数,然后乘以9,在对这个数进行四舍五入后,赋值给x

Print x'窗体打印x

End Sub

Private Sub cmdRanAngle_Click()

Dim dblAngle As double

Dim dblSin As double

'Randomize

dblAngle = dbl((90ran)+60)

dblSin = sin(dblAngle)

lblScreamCaption = dblAngle

lblAnswercaption = dblSin

End sub

最简单的方法,楼上都有错。。。。。

希望楼主采纳,有VB问题希望可以探讨,QQ827170254

你的问题说明的不够详细,到底是下面哪个区间呢?

[60,100],[60,100),(60,100],(60,100)

也没说明是要整数还是小数,要知道上述两条决定了vb表达式的写法。

生成随机小数利用rnd函数

rnd能够随机生成

[0,1俯发碘菏鄢孤碉酞冬喀)区间的小数

例如:生成[60,100)区间的小数的表示方法是

rnd40+60

生成[60,100]区间的整数的表示方法是

int(rnd41+60),其中int是取整函数,如int(35)等于3,没有四舍五入单纯取整数位。

可以的,先设定TEXTBOx的属性值,确定范围,

随机数产生用 Rnd函数。

比如:Int(Rnd整数n) ;产生0,1,2,3,。。。。,n-1中的随机数。

Rnd产生的是0~1的随机数。、

例如:int(Rnd(n-m+1)+m);产生的是在区间m,n内的数。

1、设置随机产生[n,m]之间的随机数(m>n),最小的随机数是n,然后在n的基础上加上m-n的差值内的随机数就可以了;

2、随机数代码是int(rnd(m-n))+n

3、产生两个数之间的随机数闭区间示例(以产生一个[10,90]之间的随机数为例):

private sub command1_click()

dim n as integer

randomize

n = int(rnd 90) + 10

print n;

end sub

以上就是关于vb如何随机抽数比如在100至200之间随机选择一个整数显示在下方。求详细解答,谢谢!全部的内容,包括:vb如何随机抽数比如在100至200之间随机选择一个整数显示在下方。求详细解答,谢谢!、vb如何运用随机数、vb中如何取得随机3位数等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/web/9551457.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-04-29
下一篇 2023-04-29

发表评论

登录后才能评论

评论列表(0条)

保存