| Visual Basic クラスライブラリ詳解 |
|
|
Visual Basic 中学校 > クラスライブラリ詳解 > System >
Random
| 完全限定名 | System.Random |
| 基底クラス | System.Object |
| インターフェイス | なし |
| 派生クラス | なし |
| 使用頻度 | D |
| バージョン | .NET Framework 1.0以上 (VB.NET2002以上) |
| 主な機能 | ランダムな数を生成する。 |
Ramdomクラスはランダムな数を生成する小さなクラスです。
ランダムな数値を取得するときはNextメソッド等を使用します。以下はNextメソッドの単純な使用例です。この例ではNextメソッドに最小値と最大値を指定しています。この場合Nextメソッドの戻り値は最小値以上、最大値未満の整数になります。Randomクラスはこの他の方法でランダムな数値を生成することもできます。その方法は少し後で説明します。
| Dim
MyRandom As New
Random '1〜10の範囲でランダムな数値を取得します。 |
■リスト１
Randomクラスを使用する際は次の指針を念頭においてください。
・乱数が必要となるたびにRandomクラスのインスタンスを作成するのではなく、１回だけ生成したRandomクラスのインスタンスを何回も使うようにしてください。
・Randomクラスのインスタンスを作成する場合はコンスタクラに毎回同じ引数が渡らないようにしてください。そのためには引数なしのコンストラクタを渡すか、時刻などその都度変わる値をコンストラクタに指定します。
・Randomクラスが使用する擬似乱数発生のアルゴリズムは公開されているため、どのような乱数が発生するのか予測可能な場合があります。セキュリティ上重要なな暗号化などに使用する乱数の生成にはRandomクラスではなくRNGCryptoServiceProviderクラスを使用してください。
このようにしなかった場合、生成される数値はランダムでなかったり、予測可能なものとなってしまいます。
Randomクラスが生成するランダムな数は確率精度が劣るために厳密には数学上の「乱数」ではありませんが、この精度の違いは無視しても構わないくらい小さいので「乱数」として扱うことができます。
コンストラクタは次の２つです。
| コンストラクタの引数 | 説明 |
| (なし) | インスタンスを作成したときの時刻を利用してランダムな数を生成します。同じ時刻にインスタンスを作成すると同じ値を生成します。 |
| Integer | 引数を利用してランダムな数を生成します。同じ引数を渡すと同じ値を生成します。 |
■表１
Randomクラスはインスタンス化されたときに既にどのようなランダムな数値を発生させるか決定しています。そのため、同じ方法でRandomクラスをインスタンス化するといつも同じ数値を返すようになります。
たとえば、次のコードのようにRandomクラスのコンストラクタに 0 を指定すると、Nextメソッドは必ず 8, 9, 8, 6, 3, 6, 10, 5, 10, 3, 3, … の順で数値を生成します。
| Dim
MyRandom As New
Random(0) Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click TextBox1.Text = MyRandom.Next(1, 11) End Sub |
■リスト２
このため、はじめに書いたように、Randomクラスのインスタンスを作成する場合は固定で数値を指定するのではなく、時刻のようにその都度変わる値を指定するか、引数なしのコンストラクタを使用します。
なお、このようにランダムな数列を発生させるために渡す初期値のことを「乱数シード」または単に「シード」と呼びます。「シード」とは英語のseed、つまり種のことです。
さて、引数なしのコンストラクタを使用した場合にランダムな数値が必要になるたびにインスタンスを作成すると、予期せぬ数値を生成する場合があります。
次の例では、TextBox1とTextBox2にはかなり高い確率で同じ値が表示されます。
| Dim
MyRandom1 As New
Random TextBox1.Text = MyRandom1.Next(1, 11)
Dim MyRandom2 As
New Random |
■リスト３
引数なしのコンストラクタを使用した場合、時刻を元にランダムな数列を生成するので、このように短い間隔でインスタンスを作成した場合は同じ時刻が使用されて同じ数列が生成されてしまいます。これらの問題を回避するためにRandomクラスはその都度インスタンスを作成するのではなく、１回だけ作成したインスタンスを何度も使うようにします。
次の例ではTextBox1とTextBox2には高い確率で異なる数値が表示されます。
| Dim
MyRandom As New
Random Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click TextBox1.Text = MyRandom.Next(1,
11) End Sub |
■リスト４
ところで、気にしている方が多いようなのでランダムな数値の予測可能性について少し触れておきますが、実際のゲーム等に使用する分には十分な精度でランダムな数値が生成されますので通常は気にする必要はありません。
Randomクラスを使うといくつかの方法でランダムな数値を取得することができます。それぞれの使用例も合わせてまとめます。
| 生成されるランダムな数値 | 生成方法 |
| 0〜2147483647の範囲でランダムな整数を取得する。 | Nextメソッドを引数なしで使用します。 |
| 指定した最大値未満で0以上のランダムな整数を取得する。 | 最大値を指定してNextメソッドを使用します。 |
| 指定した範囲内でランダムな整数を取得する。 | 最小値と最大値を指定してNextメソッドを使用します。 |
| 0〜255の範囲でランダムなの整数の数列を取得する。 | NextBytesメソッドを使用します。 |
| 0以上1未満のランダムな小数を取得する。 | NextDoubleメソッドを使用します。 |
■表２
| Dim
MyRandom As New
Random TextBox1.Text = MyRandom.Next |
■リスト５
この例では0〜100までのランダムな整数を取得します。Nextメソッドの引数は101となっていることに注意してください。
| Dim
MyRandom As New
Random TextBox1.Text = MyRandom.Next(101) |
■リスト６
この例では1〜12までのランダムな整数を取得します。Nextメソッドの第２引数が13となっていることに注意してください。
| Dim
MyRandom As New
Random TextBox1.Text = MyRandom.Next(1, 13) |
■リスト７
| Dim
MyRandom As New
Random Dim RandomBytes(99) As Byte MyRandom.NextBytes(RandomBytes) For
Each b As
Byte In
RandomBytes |
■リスト８
| Dim
MyRandom As New
Random TextBox1.Text = MyRandom.NextDouble |
■リスト９
Randomクラス以外にもランダムな値を発生させるための機能があります。１つははじめにも少し言及したRNGCryptoServiceProviderクラスを使う方法です。このクラスは暗号乱数ジェネレータを使用してランダムな値の数列を生成します。
もう１つの方法としてVBのRnd関数を呼び出してランダムな値を生成することもできます。Rnd関数は0以上1未満のランダムな小数を返します。Randomizeステートメント使用するとRnd関数が生成する乱数に新しいシードを引き渡すことができます。
資料：RandomクラスのPublicメンバ
| 名前 | 由来 | 読み方 | 機能 | |
 |
Equals | Object | イコールズ | |
|
|
GetHashCode | Object | ゲットハッシュコード | |
|
|
GetType | Object | ゲットタイプ | |
|
|
Next | ネクスト | ランダムな整数を生成 | |
|
|
NextBytes | ネクストバイツ | ランダムな数列を生成 | |
|
|
NextDouble | ネクストダブル | ランダムな小数を生成 | |
 |
ReferenceEquals | Object | リファレンスイコールズ | |
|
|
ToString | Object | トゥーストリング | クラスの完全限定名を返す |
■表３