这么试 你就明白了
不加randomize 运行 记住数字 关闭 再运行 对比数字
加randomize 运行 记住数字 关闭 再运行 对比数字

就是说不加RANDOMIZE电脑每次依序生成的数字都是一样的
那么一般做编程题目要不要写randomize呢？

Randomize ' 对随机数生成器做初始化的动作，如果不使用Randomize函数，得到的结果将有规律性。

不加RANDOMIZE电脑每次依序生成的数字都是一样的....正确
养成习惯 在 rnd 这行代码前加上 Randomize 当然不要在循环里面加.

'　随机生成100个三位正整数
Dim i As Integer, j As Integer
Dim S(1 To 100) As Integer
Randomize '　…………………… 只要这个即可
For i = 1 To 100
S(i) = Int(900 * Rnd + 100)
For j = 1 To i - 1 '　j 循环，去掉重复数
If S(i) = S(j) Then i = i - 1 : j = i + 1
Next
Next