VB中randomize函数的用法

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
我是在循环语句前面使用 就不会出现重复的数字了耶

最佳答案
初始化随机数生成器。
语法
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 之间的随机数值。

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

randomize是随机数的一个控制器。
只要你在rnd前面加入这句话，下次随机数肯定与第一次随机数不一样。

140(19)关于VB的一道选择题
19、Randomize语句的功能是(A ).
A、产生一个(0,1)之间的随机小数 B、产生一个[1,10]之间的随机整数
C、产生一个(-1,1)之间的随机小数 D、产生新的随机序列

140(35)关于VB的一道选择题
35、在定义过程时,过程名后面括号中的标识符被称为( B ).
A、属性 B、形参
C、实参 D、变量
为什么呢？

randomize是一种函数，功能是初始化随机数发生器。
中文名: 随机
外文名: randomize
功 能 :初始化随机数发生器
用 法: void randomize(void)

翻译:
randomize
中文翻译：随机
C语言
基本信息
函数名:randomize
功 能:初始化随机数发生器
用 法:void randomize(void);
程序例
#include<stdlib.h>
void main()
{
int i;
randomize();
printf(“Ten random numbers from 0 to 99\n\n”);
for(i=0;i<10;i++)
printf(“%d\n”,rand()%100);
}
注：可以在TC2.0中运行通过，在VC6.0不能运行。
用法
VC
VC中使用srand()来初始化为随机数生成器。代码实例：
#include <stdio.h>
#include <stdlib.h>
#include <time.h>
#define N 10
main()
{
int i;
srand(time(0)); /设置种子,并生成伪随机序列/
for(i=0;i<N;++i)
printf(“%d\n”,rand()%100);/得到[0,99]伪随机数/
system(“pause”);
}
VB
语句名:Randomize
功 能:初始化随机数发生器
用 法:Randomize
Randomize 语句示例
本示例用 Randomize 语句初始化随机数生成器。由于忽略了数值参数， 所以 Randomize 用 Timer 函数的返回值作为新的随机数种子值。
Dim MyValue
Randomize ’ 对随机数生成器做初始化的动作。
MyValue = Int(6 Rnd+1) ’ 生成 1 到 7 之间(不包括7)的随机整数。
Delphi
以下事例将随机产生0到100的数字，如果不使用Randomize函数，得到的结果将有规律性。
procedure TForm1.btn1Click(Sender: TObject);
begin
randomize;
ShowMessage(IntToStr(Random(100)));
end;
pascal
pascal中如果不使用randomize，就是上一次的结果。并且，pascal中的随机数语句是从0开始的，以X-1结束。因此如果随机产生0~100间的数要用random(101)来。
下面一个产生0~100的随机数的程序：
var a:integer;
begin
randomize;
a:=random(101);
writeln(a);
readln;
end.
FBIde
同上，在FBIde里，如果没有RANDOMIZE，随机出来的结果跟开始一样
下面是产生20个0~100之间的整数的语句(要用到一维数组）：
FOR I=1 TO 20
A(I)=INT(RND101)
NEXT I