VB如何生成随机数

如何用VB做一个生成随机数的软件?要求生成的数是1到53之间,要整数因为上课抽签用代码是什么?如果比较简单的话最好说明一下每段的用途,顺便学习一下,会适当加分如果是把生成... 如何用VB做一个生成随机数的软件?
要求生成的数是1到53之间,要整数因为上课抽签用
代码是什么?如果比较简单的话最好说明一下每段的用途,顺便学习一下,会适当加分
如果是把生成的数输出text1这里,有没有方法另字体大一点?
展开
 我来答
飞喵某
高粉答主

2019-06-02 · 说的都是干货,快来关注
知道答主
回答量:631
采纳率:0%
帮助的人:29.1万
展开全部

1、打开“Microsoft Visual Basic 6.0 中文版”软件,准备一个空白的工程文件:

2、然后需要一个命令按钮,单击左侧工具箱中的“命令按钮”,在窗体中右侧拖动鼠标左键画出即可:

3、双击该命令按钮,这里演示输入代码打印0~10之间的任意随即整数,生成其他范围的随机整数公式为“int((上限-下限+1)*Rnd+下限)”,如果是1到53就是“int((1-53+1)*Rnd+53”:

4、写完之后运行程序,每单击一次命令按钮,就会在窗体上打印一个0~10之间的随即整数:

xp19971025
推荐于2019-09-17 · TA获得超过17.6万个赞
知道小有建树答主
回答量:42
采纳率:100%
帮助的人:2.2万
展开全部

1、随机生成数生成通式:

Randomize      ‘必要代码,不然的话每次随机生成都是一样的数

a=int(rnd*(m-n+1))+n   ’   其中m>n生成n~m间(包括n,m)的随机整数

假如我想随机生成20-100间 ,那么就是n=20,m=100

代码是int(rnd*(100-20+1))+20

2、代码:

Private Sub Command1_Click()
Cls
Dim n As Integer
Dim wzs(10) As Integer
n = 1
While n <= 10
wzs(n) = Int(Rnd * 1000)
n = n + 1
Wend
n = 1
While n <= 10
Print wzs(n)
n = n + 1
Wend

扩展资料

随机数是专门的随机试验的结果。

在统计学的不同技术中需要使用随机数,比如在从统计总体中抽取有代表性的样本的时候,或者在将实验动物分配到不同的试验组的过程中,或者在进行蒙特卡罗模拟法计算的时候等等。

产生随机数有多种不同的方法。这些方法被称为随机数生成器。随机数最重要的特性是它在产生时后面的那个数与前面的那个数毫无关系。

参考资料

百度百科-随机数



本回答被网友采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
discovery522
推荐于2017-09-07 · TA获得超过4714个赞
知道大有可为答主
回答量:2308
采纳率:71%
帮助的人:1507万
展开全部
其实随机生成数很简单:
----------------------------------
Randomize ‘必要代码,不然的话每次随机生成都是一样的数

a=int(rnd*(m-n+1))+n ’其中m>n生成n~m间(包括n,m)的随机整数
假如我想随机生成20-100间
那么就是n=20,m=100
代码是int(rnd*(100-20+1))+20
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
新时代向前冲
推荐于2019-09-06 · TA获得超过2.1万个赞
知道小有建树答主
回答量:171
采纳率:0%
帮助的人:7.1万
展开全部

其实随机生成数很简单:

----------------------------------

Randomize   ‘必要代码,不然的话每次随机生成都是一样的数

a=int(rnd*(m-n+1))+n   ’其中m>n生成n~m间(包括n,m)的随机整数

假如我想随机生成20-100间

那么就是n=20,m=100

代码是int(rnd*(100-20+1))+20

Visual Basic(简称VB)是Microsoft公司开发的一种通用的基于对象的程序设计语言,为结构化的、模块化的、面向对象的、包含协助开发环境的事件驱动为机制的可视化程序设计语言。是一种可用于微软自家产品开发的语言。 [1] 

“Visual” 指的是开发图形用户界面 (GUI) 的方法——不需编写大量代码去描述界面元素的外观和位置,而只要把预先建立的对象add到屏幕上的一点即可。 “Basic”指的是 BASIC (Beginners All-Purpose Symbolic Instruction Code) 语言,是一种在计算技术发展历史上应用得最为广泛的语言。

Visual Basic源自于BASIC编程语言。VB拥有图形用户界面(GUI)和快速应用程序开发(RAD)系统,可以轻易的使用DAO、RDO、ADO连接数据库,或者轻松的创建Active X控件,用于高效生成类型安全和面向对象的应用程序 [2]  。程序员可以轻松的使用VB提供的组件快速建立一个应用程序。

本回答被网友采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
百度网友ad91290
推荐于2017-09-11 · TA获得超过276个赞
知道答主
回答量:20
采纳率:0%
帮助的人:22.7万
展开全部
将以下代码输入即可
Private Sub Form_Click() '窗体Click()事件
Randomize
'防止每次生出随机数一样
Print Int(Rnd * 53) + 1
'rnd()生成[0,1)的随机数,int()是取整
End Sub
改text1的font属性,那有改字号的
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(7)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式