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 End Sub End Module