Mega Code Archive
Random NextBytes fills the elements of a specified array of bytes with random numbers
<![CDATA[
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
]]>