Mega Code Archive

 

Categories / VisualBasic Script / Math Functions

 

To prevent repetitive sequences, use the Randomize statement to initialize the random number generator with a seed value ba

Sub intDemo()     Dim val1     Randomize     val1 = Int(100 * Rnd + 1) End Sub