C# と VB.NET の質問掲示板

■No89024 (なつ さん) に返信
> 774RR さん
> Azulean さん
> shu さん
> furu さん
> ありがとうございます。
> 
> 説明不足ですみません。
> ネットのを参考にさせて頂きましたが他の方法でもあればお願いします。
> 
>    For i = 0 To 200
>        Dim r1 As New System.Random(1000)
>        Dim r2 As Integer = r1.Next(1, 3000)
> 
>        'ここで毎回違う r2 を使って他の処理をしたいのです。  
> 
>    Next

Dim r1 As New System.Random(1000)
For i = 0 To 200
    Dim r2 As Integer = r1.Next(1, 3000)
Next

とすれば,ループ内では異なる値になるが実行しなおしたときにiの値に対するr2の値は同じになります。



Dim r1 As New System.Random()
For i = 0 To 200
    Dim r2 As Integer = r1.Next(1, 3000)
Next

とすれば実行しなおすごとに、iの値に対するr2の値も変わります。