<< 前へ        次へ >>

ID : 292

Randomize

機能

乱数ジェネレータを初期化(乱数系列を再設定)します。

構文

Randomize[(数式)]

指定項目

数式
指定した値を元に新しいシード値を設定します。省略時はTimerの戻り値を引数にします。

解説

引数 数式 には、Rnd 関数の乱数ジェネレータに与える新しいシード値を指定します。引数 数式 を省略した場合、システム タイマーから取得した値が新しいシード値として使われます。

関連項目

Rnd、 シード値

注意事項

-

用例

'!TITLE "乱数発生コマンドRndの乱数シードの初期化"
' 0以上1未満の乱数を作成し、表示
Sub Sample_Randomize

  Dim aaa As Single
  Dim bbb As Integer

  ' 乱数シードの初期化
  Randomize

  For bbb = 1 to 5
    ' 0以上1未満の乱数を発生させ、aaaに代入
    aaa = Rnd

    ' メッセージ出力ウィンドウに乱数を表示
    PrintDbg aaa

  Next

End Sub

ID : 292

<< 前へ        次へ >>