Random.NextBytes fills the elements of a specified array of bytes with random numbers.
Module Example Public Sub Main() Dim rnd As New Random() Dim b(10) As Byte
rnd.NextBytes(b)
Console.WriteLine("The Random bytes are: ") Dim i As Integer
For i = 0 To 9
Console.Write(i)
Console.Write(":")
Console.WriteLine(b(i))
Next i