VB如何生成随机数

来源：百度知道编辑：UC知道时间：2024/06/01 06:41:18

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

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

VB如何生成4-5位的随机数如何生成随机数数据库求VB的生成随机数函数 html页面如何生成随机数如何在VB中生成随机数,用Rnd生成的数,每次运行时得到数都一样。 VB中如何取随机数？生成随机数 rnd函数是如何生成随机数的? 如何保存excel生成的随机数 vb 生成26字母给出调用了多少次随机数