Here is a simple way to generate Random Integers in VB.NET

 

Dim iRnd As Integer = CInt(Math.Ceiling(Rnd() * n))

 

Where n is the max number

 

eg.    Dim iRnd As Integer = CInt(Math.Ceiling(Rnd() * 10))

 

will generate random numbers between 1 and 10