Funkcja Rnd

Funkcja Rnd zwraca liczbę pseudolosową typu Single.

Składnia funkcji Rnd:

Rnd[(Wartość)]

Argument Wartość jest opcjonalny. Może być typu Single lub dowolnym wyrażeniem numerycznym.

Wartości zwracane przez funkcję Rnd:

Wartość wejściowa	Zwracana wartość
Mniejsza niż zero	Ta sama wartość za każdym razem (wartość wejściowa używana jako podstawa generatora liczb losowych)
Równa zero	Najczęściej generowana liczba
Większa niż zero	Następna liczba losowa w sekwencji
Nieokreślona	Następna liczba losowa w sekwencji

Funkcja Rnd zwraca wartość mniejszą niż 1 i większą lub równą zero.
Wartość argumentu Wartość określa sposób generowania liczb przez funkcję Rnd:
Dla każdej podanej podstawy generatora zwracana jest ta sama liczba przy każdym wywołaniu funkcji Rnd, ponieważ poprzednia liczba jest używana jako podstawa generatora dla następnej liczby w sekwencji.
Przed wywołaniem funkcji Rnd należy użyć instrukcji Randomize bez argumentów aby zainicjować generator pseudolosowy z podstawą opartą na zegarze systemowym.

Aby wygenerować liczbę z podanego przedziału należyć użyć składni:

Int((GornyZakres - DolnyZakres +1) * Rnd + DolnyZakres)

GornyZakres jest największą liczbą z zakresu a DolnyZakres najmniejszą liczbą z zakresu.

Aby powtórzyć sekwencję liczb losowych należy wywołać funkcję Rnd z ujemnym argumentem bezpośrednio przez użyciem Randomize z argumentem numerycznym. Użycie Randomize z tą samą wartością nie powtórzy poprzedniej sekwencji.

Przykład użycia funkcji Rnd:

Dim varLiczba As Variant
varLiczba=Int((6*Rnd)+1) 'generowanie liczby z zakresu 1 do 6

(Zmienne i typy zmiennych i funkcjaInt zostały opisane w innych częściach kursu.)

na górę strony...