Dim rand As Random = New Random
' Generate a random number between specific intervals (10 and 20.)
Dim num1 As Int16 = rand.Next(10, 20)
' Generate a random number less than 100.
Dim num2 As Int16 = rand.Next(100)
posted @ martedì 23 novembre 2004 18:59