Vráti hodnotu typu Single, ktorá obsahuje náhodné číslo.
Syntax
Rnd[(číslo)]
Voliteľný argument čísloje jeden alebo ľubovoľný platný numerický výraz.
Vrátené hodnoty
| Ak argument číslo je | Funkcia Rnd generuje |
|---|---|
| Menšie než nula | Zakaždým rovnaké číslo, pričom ako hodnota sa použije číslo . |
| Väčšie než nula | Nasledujúce náhodné číslo v poradí. |
| Rovné nule | Naposledy generované číslo. |
| Nezadané | Nasledujúce náhodné číslo v poradí. |
Poznámky:
Funkcia Rnd vráti hodnotu menšiu ako 1, ale väčšiu alebo rovnú nule.
Hodnota čísla určuje, ako funkcia Rnd generuje náhodné číslo:
Pre akúkoľvek danú počiatočnú hodnotu sa generuje rovnaká postupnosť čísel, pretože každé nasledujúce volanie funkcie Rnd používa predchádzajúce číslo ako počiatočnú hodnotu pre ďalšie číslo v postupnosti.
Pred volaním funkcie Rnd použite príkaz Randomize bez argumentu na inicializáciu generátora náhodných čísel pomocou počiatočnej hodnoty založenej na systémovom časovači.
Ak chcete získať náhodné celé čísla v určitom rozsahu, použite tento vzorec:
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
Položka upperbound predstavuje najvyššie číslo v rozsahu a položka lowerbound najnižšie číslo v rozsahu.
Poznámka
Ak chcete zopakovať postupnosť náhodných čísel, vykonajte volanie funkcie Rnd so záporným argumentom bezprostredne pred použitím príkazu Randomize s číselným argumentom. Pri použití príkazu Randomize s rovnakou hodnotou argumentu číslo sa neopakuje predchádzajúca postupnosť.
Príklad dotazu
| Výraz | Výsledky |
|---|---|
| SELECT ProductSales.ProductID, Rnd([Discount]) AS RandomNumbers FROM ProductSales; | Vráti ID produktu spolu s náhodnými číslami v stĺpci NáhodnéČísla. |
Príklad VBA
Poznámka
Nasledujúce príklady ukazujú použitie tejto funkcie v module jazyka Visual Basic for Applications (VBA). Ak chcete získať ďalšie informácie o práci s jazykom VBA, vyberte z rozbaľovacieho zoznamu vedľa položky Hľadať možnosť Odkaz pre vývojára a do vyhľadávacieho poľa zadajte nejaké výrazy.
V tomto príklade je funkcia Rnd použitá na generovanie náhodného celého čísla v rozsahu od 1 do 6.
Dim MyValue
' Generate random value between 1 and 6.
MyValue = Int((6 * Rnd) + 1)