育才学习网1.Randomize函数的用法
Randomize主要是针对Rnd这个函数的 给你举个代码示例吧 Private Sub Form_Click() For i = 1 To 10 Print Int(Rnd * 10); " " Next i End Sub 你运行时点一下窗体 会得到一组数 记下来 关闭程序 然后再运行一遍 记下再次得到的一组数 看吧是一样的 再给你一个程序 Private Sub Form_Click() Randomize For i = 1 To 10 Print Int(Rnd * 10); " " Next i End Sub 运行时点一下窗体 记下得到的一组数关闭 再运行 点一下窗体 又得到一组数 这两组数是不同的 明白了吧。
2.randomize函数
函数名： randomize
功 能： 初始化随机数发生器
适用语言；BASIC,VISUAL BASIC,C,C++,Delphi等
用 法： void randomize(void);
程序例：
#include <stdlib.h>
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;
3.excel怎么生成6位随机数
1、<n<10，公式为：”=int(rand()*10).
2、随机生成2位数以及2位以上的数的方法。需要注意的是，跟生成个位数不同，生生成2位以上的数需要添加一个基数。
3、生成任意位数的小数。这里需要用到前面的那一步，就是先随机生成一个个位数，然后再除以10、100、1000……来控制小数点位数。例如生成一个千分位小数就是除以1000，公式为：“=int(rand()*10)/1000”
4、生成任意区间的任意随机小数。在这里需要首先要生成对应数量的整数，再除以相应的10的次方倍。例如要生成23.22这样二位数小数，首先要生存一个千位数小数，然后在除以100就可以得到，公式如下：“=int(rand()*9000+1000)/100”。
5、那又有人说了，小数点后保留1位以上的随机数怎么生成。其实很简单，跟上一步差不多，只需把生成个位数变成生成2位数、3位数……以此类推，再除以相应的整数倍。例如：“=int(rand()*90+10)/100”，可以生成小数点后2位的随机数。
4.如何生成6位不重复的随机数
下面我给你一个示例来演示如何生成的不重复的随机数的
Private Sub Command1_Click()
Dim p As String
Randomize '初始化
p = ""
For i = 1 To 10
Do 'Do循环的作用是避免产生相同的数
x = Int(Rnd * 90) + 10 '生成10到100之间的随机整数
yes = 0 '作标记
For j = 1 To i - 1 '与已经产生的数作比较
If x = a(j) Then yes = 1: Exit For '如遇雷同，则退出此层循环，重新再生成新数
Next
Loop While yes = 1
a(i) = x '将生成的随机数赋给数组
p = p & Str(a(i)） & "，" '产生的随机数转换成字符串后累连到变量p中暂存
Next
Label1.Caption = LTrim(Left(p, Len(p) - 1）） '将全部随机数放到标签上显示
Label2.Caption = "" '清空
End Sub
5.vb中,randomize函数是什么意思,请举例说明
Randomize 语句
初始化随机数生成器。
语法
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函数生成6位数怎么写