Access开发培训
网站公告
·Access专家课堂QQ群号:151711184    ·Access快速开发平台下载地址及教程    ·欢迎加入Access专家课堂微信群!    ·如何快速搜索本站文章|示例|资料    
您的位置: 首页 > 技术文章 > Access数据库-模块/函数/VBA

获取指定范围内的随机整数

时 间:2017-04-06 08:59:06
作 者:杨雪   ID:42182  城市:南京
摘 要:获取指定范围的随机整数
正 文:

VBA编程中,如果需要获取指定范围的随机整数,需要使用Rnd()函数和Int()函数来实现,其具体语法:

Int(([上界]-[下届]+1)*Rnd()+[下届])

保存编写的VBA代码,然后按F5键运行随机整数过程,在输入对话框中输入数值,结果如图所示:

 

源码:

Sub 随机整数()
    Dim x As Double
    x = InputBox("请输入随机整数的上界:")
    MsgBox "取得" & x & "以内的随机整数:" & Int(Rnd(x) * x) _
         , , "rnd()函数&int()函数"
End Sub



Access软件网QQ交流群 (群号:483923997)       Access源码网店

常见问答:

技术分类:

相关资源:

专栏作家

关于我们 | 服务条款 | 在线投稿 | 友情链接 | 网站统计 | 网站帮助