社区
VB基础类
帖子详情
VB中在两个数之间取一随机数的函数是?请大家帮忙,在线等。
freerunning
2004-04-21 08:31:05
想在两个double型数d1,d2之间取一随机数。
...全文
641
11
打赏
收藏
VB中在两个数之间取一随机数的函数是?请大家帮忙,在线等。
想在两个double型数d1,d2之间取一随机数。
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
11 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
yenight
2004-04-21
打赏
举报
回复
如果有负数啥办呢?
cq20081127
2004-04-21
打赏
举报
回复
不明白你的意思,你的意思是指在D1和D2两个数中挑一个还是在这两个数之间的数随机选一个即D1<=X<=D2
Alicky
2004-04-21
打赏
举报
回复
不要想得太复杂。
HKSoft
2004-04-21
打赏
举报
回复
随即数mod2
为0取一为1取另一????????????
不会这么简单吧
射天狼
2004-04-21
打赏
举报
回复
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 函数随机生成一个 1 到 6 的随机整数。
Dim MyValue
MyValue = Int((6 * Rnd) + 1) ' 生成 1 到 6 之间的随机数值。
wangjunsong
2004-04-21
打赏
举报
回复
int可以不用了吧,double型。
taosin
2004-04-21
打赏
举报
回复
用Int((max- min + 1) * Rnd + min)
czwwh
2004-04-21
打赏
举报
回复
为了生成某个范围内的随机整数,可使用以下公式:
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
这里,upperbound 是随机数范围的上限,而 lowerbound 则是随机数范围的下限。
注意 若想得到重复的随机数序列,在使用具有数值参数的 Randomize 之前直接调用具有负参数值的 Rnd。使用具有同样 number 值的 Randomize 是不会得到重复的随机数序列的。
wywggggaaaa2000
2004-04-21
打赏
举报
回复
d1<=x<=d2: a=d1+ rnd*(d2-d1)
kmzs
2004-04-21
打赏
举报
回复
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
northwolves
2004-04-21
打赏
举报
回复
d1 or d2: a=iif(int(2*rnd)=0,d1,d2)
d1<=x<=d2: a=d1+ rnd*(d2-d1)
vb
随机
函数
产生2个
两
位正整数,求这2
个数
之和并显示出来
掌握
VB
中
常用的Int、Rnd
两
个数
学
函数
,学会生成某个区间
随机数
的方法,通过随机
函数
产生2个
两
位正整数,求这2
个数
之和并显示出来。
vb
Script参考文档
DateDiff
函数
返回
两
个日期
之间
的间隔。 DatePart
函数
返回给定日期 的指定部分。 DateSerial
函数
返回指定年月日的 日期子类型的变体 。 DateValue
函数
返回日期子类型的变体 。 Day
函数
返回日期,取值...
VB
Script 语言参考
中
文手册CHM
DateDiff
函数
返回
两
个日期
之间
的间隔。 DatePart
函数
返回给定日期 的指定部分。 DateSerial
函数
返回指定年月日的 日期子类型的变体 。 DateValue
函数
返回日期子类型的变体 。 Day
函数
返回日期,取值...
VB
实验报告.doc
四、实验步骤 从运用
中
点击
vb
6.0经典版 打开标准 EXE 建立一个form 1 添加
两
个CommandButton,CommandButton的caption改为"参数输入半径计算结果"和"随 机数及逆序"。然后输入代码如图 运行即可 五、实验结果 六、...
01
vb
编写双色球号码生成小程序源码20191001_1221.7z
两
个文本框,一个显示生成的号码,一个用来设置号码数量;
两
个按钮,一个用来开始生成,一个用来复制生成的号码。完整代码如下: '首先声明一个生成号码的
函数
用于调用 Sub 生成() '
vb
的
函数
名称可以用汉字的,呵呵...
VB基础类
7,763
社区成员
197,609
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章