VB.NETで乱数を発生させる


Dim rnd As New Random(1000)
' 1から3までの乱数(4は含まれないことに注意する)
Dim iRnd As Integer = rnd.Next(1, 4)