Calling Rnd() with a negative argument before calling Randomize() with a numeric argument will repeat sequences of random numbers.
Reset Randomize/random number generation seed in VB.NET
Calling Rnd() with a negative argument before calling Randomize() with a numeric argument will repeat sequences of random numbers.