randomize函数

randomize函数

函数名: randomize

功 能: 初始化随机数发生器

适用语言;BASIC,VISUAL BASIC,C,C++,Delphi等

用 法: void randomize(void);

程序例:

#include

int main(void)

{

int i;

randomize();

printf("Ten random numbers from 0 to 99\n\n");

for(i=0; i<10; i++)

printf("%d\n", rand() % 100);

return 0;

}

[编辑本段]VB 中的用法

Randomize 语句示例

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

Dim MyValue

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

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

Delphi 中的用法

以下事例将随机产生0到100的数字，如果不使用Randomize函数，得到的结果将有规律性。

procedure TForm1.btn1Click(Sender: TObject);

begin

randomize;

ShowMessage(IntToStr(Random(100)));

end;