G
Guest
I have a variable number (RecordCount) and I want to select 15 random numbers
from it and stuff them into an array. I suspect the following code won't
preclude the possibility of getting repeat numbers. How do I insure that each
of the 15 numbers will be unique?
Opiton Explicit
Option Base 1
Dim Iloop as Double
Dim RecordCount as Double
For ILoop = 1 To 15
RndNo(ILoop) = Int((RecordCount * Rnd) + 1)
Next ILoop
from it and stuff them into an array. I suspect the following code won't
preclude the possibility of getting repeat numbers. How do I insure that each
of the 15 numbers will be unique?
Opiton Explicit
Option Base 1
Dim Iloop as Double
Dim RecordCount as Double
For ILoop = 1 To 15
RndNo(ILoop) = Int((RecordCount * Rnd) + 1)
Next ILoop