Source:
Function random(min As Integer, max As Integer) As Integer
   Dim r As New Random()
   Return r.Next(min, max)
End Function 

Generate a random number from a range.

Pythoneer 6 years ago