VisualBasic.NET
Dim MyRandom As New System.Random() Dim MyValue As Integer MyValue = MyRandom.Next(-1, 1) '-1〜1までの整数を発生させる
ほかに、
MyRandom.NextDouble(-1, 1)
だと、-1〜1までのDouble型の値を発生させることもできる。