→→→ランダムな数字

Dim rnd As New Random()
Dim b(10) As Byte
rnd.NextBytes(b)
Dim i As Integer
For i = 0 To 9
   console.write(i)
   console.write(":")
   console.writeLine(b(i))
Next i