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 __stdcall RNG_Number(long nLower, long nUpper);
An integer selected at random from the set {nLower, ..., nUpper}.
Rng.Number Method
Rng.Octet Method
static int dipki::Rng::Number (int lower, int upper)
static Rng.octet()
static Rng.number(lower, upper)
static Rng.octet()
The number returned is an integer selected at random with uniform probability from the set {nLower, ..., nUpper}.
This will generate 5 random numbers in the range between -1 million and +1 million:
Dim i As Integer
For i = 1 To 5
Debug.Print RNG_Number(-1000000, 1000000)
Next
This will generate 16 random bits in [0,1]:
Dim i As Integer
For i = 1 To 16
Debug.Print RNG_Number(0, 1);
Next
Debug.Print
0 0 0 1 0 0 1 1 0 1 1 1 0 0 1 1
A function to generate a random octet (byte).
Public Function rngOctet() As Byte rngOctet = RNG_Number(0, 255) End Function
This will generate 8 random octets (bytes):
Dim i As Integer
For i = 1 To 8
Debug.Print rngOctet();
Next
Debug.Print
6 131 87 118 57 252 240 33