次の方法で共有


Randomize ステートメント

乱数ジェネレーターを初期化します。

構文

Randomize [ number ]

省略可能な 数値引数 は、 Variant または任意の有効な 数値式です。

解説

Randomize は、number を使用して新しいシード値を提供することで、Rnd 関数の乱数ジェネレーターを初期化します。 number を省略すると、システム タイマーから返される値が新しいシード値として使用されます。

Randomize を使用しないと、Rnd 関数 (引数なし) は、最初に呼び出されたときと同じ数値をシードとして使用して、その後は最後に生成された数値をシード値として使用します。

注:

乱数のシーケンスを繰り返す場合は、数値の引数を指定した Randomize を使用する直前に、負の引数を指定した Rnd を呼び出します。 number に同じ値を指定して Randomize を使用しても、前のシーケンスを繰り返すことにはなりません。

この例では、Randomize ステートメントを使用して、乱数ジェネレーターを初期化します。 数値の引数が省略されているため、Randomize は、新しいシード値として Timer 関数からの戻り値を使用します。

Dim MyValue 
Randomize ' Initialize random-number generator. 
 
MyValue = Int((6 * Rnd) + 1) ' Generate random value between 1 and 6. 

関連項目

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。