close

Dim RndNum As New Random() '最好在程式一開始就設定好



RndNum.Next() '產生大於等於0,小於2,147,483,647之亂數


RndNum.Next(10) '產生大於等於0,小於10之亂數


RndNum.Next(10, 20) '產生大於等於10,小於20之亂數


RndNum.NextDouble() '產生大於或等於 0.0,且小於 1.0雙精度浮點數


RndNum.NextBytes(bytes) '以亂數填入指定位元組陣列的元素

arrow
arrow
    全站熱搜

    createps 發表在 痞客邦 留言(0) 人氣()

    E-mail轉寄