2016年6月3日

Visual Basic 2010 的亂數

三種常用的方法

Dim Num As New Random()


  1. Num.Next() → 產生一個 0 ~ 2,147,483,647 的亂數。
  2. Num.Next(6) → 產生一個 0 ~ 6 的亂數。
  3. Num.Next(1, 42) → 產生一個 1(含) ~ 42(含) 的亂數。
  4. Num.NextDouble() → 產生一個  0 ≦ number < 1 的浮點亂數。

如果想要一次產生 6 個範圍在 0 ~ 255 之間的亂數,則可以使用以下方法:

Dim Num As New Random()
Dim Buffer As Byte() = New Byte(5) {}
Num.NextBytes(b)
For Each i As Byte In Buffer
  Msgbox(i)
Next