System.Random を使います。
---------------------------------------------------------------
Dim oRand As New Random( )
Dim i As Integer
For i = 1 To 6
Console.Write( " {0,10} ", oRand.Next( ) ) 'Integer の乱数
Console.WriteLine( " {0:F8} ", oRand.NextDouble( ) ) 'Double の乱数
Next i
お礼
有難うございました 早速やってみます