×

基于vb.net的随机数实例

Kalet Kalet 发表于2009-03-20 12:00:14 浏览270 评论0

抢沙发发表评论

基于vb.net的随机数实例

 程序代码基于vb.net的随机数实例
Module myModule
    Sub Main()
        Dim rand = New System.Random()
        Dim i As Integer
        Console.WriteLine("方法名称:next();功能描述:返回一个0~2147483647之间的整数")
        For i = 0 To 9
            Console.WriteLine("返回一个0~2147483647之间的整数[" + i.ToString + "]:" +
rand.next().ToString)
        Next i
        Console.WriteLine()
        Console.WriteLine("方法名称:next(i);功能描述:返回一个0~i之间的整数")
        For i = 0 To 9
            Console.WriteLine("返回一个0~30之间的整数[" + i.ToString + "]:" +
rand.next(30).ToString)
        Next i
        Console.WriteLine()
        Console.WriteLine("方法名称:next(i,j);功能描述:返回一个i~j之间的整数")
        For i = 0 To 9
            Console.WriteLine("返回一个100~200之间的整数[" + i.ToString + "]:" +
rand.next(100, 200).ToString)
        Next i
        Console.WriteLine()
        Console.WriteLine("方法名称:Nextdouble();功能描述:返回一个0~1之间的随机小数")
        For i = 0 To 9
            Console.WriteLine("返回一个0~1之间的随机小数[" + i.ToString + "]:" +
rand.nextdouble().ToString)
        Next i
        Console.WriteLine()
        Console.Read()
    End Sub
End Module


 引用内容
方法名称:next();功能描述:返回一个0~2147483647之间的整数
返回一个0~2147483647之间的整数[0]:196001973
返回一个0~2147483647之间的整数[1]:984294363
返回一个0~2147483647之间的整数[2]:1467976057
返回一个0~2147483647之间的整数[3]:876714129基于vb.net的随机数实例
返回一个0~2147483647之间的整数[4]:732327138
返回一个0~2147483647之间的整数[5]:1537673630
返回一个0~2147483647之间的整数[6]:1398883531
返回一个0~2147483647之间的整数[7]:410176201
返回一个0~2147483647之间的整数[8]:744685288
返回一个0~2147483647之间的整数[9]:56450748
方法名称:next(i);功能描述:返回一个0~i之间的整数
返回一个0~30之间的整数[0]:5
返回一个0~30之间的整数[1]:29
返回一个0~30之间的整数[2]:4
返回一个0~30之间的整数[3]:13
返回一个0~30之间的整数[4]:14
返回一个0~30之间的整数[5]:6
返回一个0~30之间的整数[6]:20
返回一个0~30之间的整数[7]:16
返回一个0~30之间的整数[8]:28
返回一个0~30之间的整数[9]:0
方法名称:next(i,j);功能描述:返回一个i~j之间的整数
返回一个100~200之间的整数[0]:182
返回一个100~200之间的整数[1]:182
返回一个100~200之间的整数[2]:126
返回一个100~200之间的整数[3]:120
返回一个100~200之间的整数[4]:129
返回一个100~200之间的整数[5]:176
返回一个100~200之间的整数[6]:125
返回一个100~200之间的整数[7]:192
返回一个100~200之间的整数[8]:185
返回一个100~200之间的整数[9]:196
方法名称:Nextdouble();功能描述:返回一个0~1之间的随机小数
返回一个0~1之间的随机小数[0]:0.169256880958219
返回一个0~1之间的随机小数[1]:0.662054825882453
返回一个0~1之间的随机小数[2]:0.299768273858246
返回一个0~1之间的随机小数[3]:0.303578390881223
返回一个0~1之间的随机小数[4]:0.857608423036341
返回一个0~1之间的随机小数[5]:0.414038705366682
返回一个0~1之间的随机小数[6]:0.755220358611653
返回一个0~1之间的随机小数[7]:0.944761855036375
返回一个0~1之间的随机小数[8]:0.500494876178212基于vb.net的随机数实例
返回一个0~1之间的随机小数[9]:0.0428580516217547


群贤毕至

访客