Question

VB中randomize的用法

Private Sub Form_Click()
Dim a(9) As Integer, x As Integer
Randomize
For i = 0 To 9
'Randomize 如果在此处 则不会出现重复的数字 为啥呢 这里不能用吗
a(i) = Int(Rnd * 91 + 9)
Print a(i);
x = x + a(i)
Next i
Print "答案" & x
End Sub
我是在循环语句前面使用 就不会出现重复的数字了耶

Answer 1

初始化随机数生成器。

语法

Randomize [number]

可选的 number 参数是 Variant 或任何有效的数值表达式。

说明

Randomize 用 number 将 Rnd 函数的随机数生成器初始化，该随机数生成器给 number 一个新的种子值。如果省略 number，则用系统计时器返回的值作为新的种子值。

如果没有使用 Randomize，则（无参数的）Rnd 函数使用第一次调用 Rnd 函数的种子值。

注意 若想得到重复的随机数序列，在使用具有数值参数的 Randomize 之前直接调用具有负参数值的 Rnd。使用具有同样 number 值的 Randomize 是不会得到重复的随机数序列的。

Randomize 语句示例
本示例用 Randomize 语句初始化随机数生成器。由于忽略了数值参数， 所以 Randomize 用 Timer 函数的返回值作为新的随机数种子值。

Dim MyValue
Randomize ' 对随机数生成器做初始化的动作。

MyValue = Int((6 * Rnd) + 1) ' 生成 1 到 6 之间的随机数值。

Answer 2

“VB”中“randomize”的用法是；

Randomize 用 number 将 Rnd 函数的随机数生成器初始化，该随机数生成器给 number 一个新的种子值。如果省略 number，则用系统计时器返回的值作为新的种子值。 

注意 若想得到重复的随机数序列，在使用具有数值参数的 Randomize 之前直接调用具有负参数值的 Rnd。使用具有同样 number 值的 Randomize 是不会得到重复的随机数序列的。

Answer 3

Randomize 是初始化随机数
没有这个语句 RND 就是1个定值 不会改变
只有用 Randomize RND 才会有一个新的值

Answer 4

randomize是随机数的一个控制器。

只要你在rnd前面加入这句话，下次随机数肯定与第一次随机数不一样。

Answer 5

Randomize后面还有个单词Timer