Question

vb的random是怎么使用的，会的可以麻烦写一段吗。万分感谢

Answer 1

Randomize  '初始化种子值
公式: int((上限-下限+1)*rnd+下限)

你只要把上限和下限代到公式里，就得出随机数了。如得到1-10之类的数（添加text控件）：

Randomize '初始随机种子
zd = 10 '最大值
zx = 1 '最小值
Text1.text = Int(((zd - zx + 1) * Rnd) + zx)

Answer 2

随机小数函数，在vb里用rnd表示，可产生0和1之间的随机小数，例如：0.000......1—0.999......9，一般配合int或cint使用。a=int（10*rnd）。a=0—9的随机整数。a=cint（10*rnd）。a=0—10的随机整数。 取20—30之间的整数就是a=cint（（30-20）*rnd+20）。适用于不确定因素的结果。灵活运用是关键。

Answer 3

random 为随机函数，例如
dim a as Integer
a=random(x as String)
则a等于0—x之间的任意整数。

追问

x可以是80吗

我想规定为20到50的话怎么写

追答

Private Sub Command1_Click()
Dim i As Integer
Dim getRnd As Long

For i = 1 To 100
getRnd = Rnd * (50 - 20) + 20
Debug.Print getRnd
Next
End Sub
这个就是设定 20-50之间，Rnd为0到1之间。希望能帮到你。

追问

下面d开头的那句是什么意思

追答

Debug.Print getRnd 这个吗？是控制台打印的

Answer 4

如果您要问vb的随机数函数Rnd用法，可参看：
http://zhidao.baidu.com/question/232559477.html

如果您要问vb的Randomize函数用法，可参看：
http://zhidao.baidu.com/question/181237100.html

Answer 5

vb没有random函数 一下是vb中的随机数使用方法
Randomize 初始化随机种子 直接调用即可 程序使用随机数前执行一遍可以让生成的随机数每次都不同
Rnd函数
语法：Rnd[(number)]
number是可选参数
如果 number 的值是

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

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

等于 0
最近生成的数。

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

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

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

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

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

为了生成某个范围内的随机整数，可使用以下公式：
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)

比如生成0--100范围内的随机整数

Dim a as Integer

Randomize
a=101*Rnd