Returns an integer selected at random between specified limits.
Public Declare Function RNG_Number Lib "diCrPKI.dll"
(ByVal nLower As Long, ByVal nUpper As Long) As Long
nRandom = RNG_Number(nLower, nUpper)
Long specifying a lower limit.Long specifying an upper limit.
long _stdcall RNG_Number(long lower, long upper);
Long: An integer selected at random from the set {nLower, ..., nUpper}.
The number returned is an integer selected at random with uniform probability from the set {nLower, ..., nUpper}.
This will generate 10 random numbers in the range between -1 million and +1 million:
Dim i As Integer
For i = 1 To 10
Debug.Print RNG_Number(-1000000, 1000000)
Next
This will generate 8 random bits in {0,1}:
Dim i As Integer
For i = 1 To 8
Debug.Print RNG_Number(0, 1);
Next
Debug.Print