Simple  function  to generate an  random  number:
Private Function RandomNumber(min As Integer, max As Integer) As Integer 
Dim random As New Random()
Return random.Next(min, max)
End Function
Dim random As New Random()
Return random.Next(min, max)
End Function
 
0 comments:
Post a Comment