Vráti hodnotu typu Single, ktorá obsahuje náhodné číslo.
Syntax
Rnd[(číslo)]
Voliteľný argument argumentčíslo je číslo s jednoduchou presnosťou alebo akýkoľvek platný numerický výraz.
Vrátené hodnoty
Ak argument číslo je |
Funkcia Rnd generuje |
Menšie než nula |
Vždy rovnaké číslo, pričom argument číslo sa použije ako počiatočná hodnota. |
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 argumentu číslo určuje spôsob, akým 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, aby sa inicializoval generátor náhodných čísel počiatočnou hodnotou na základe systémového časovača.
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 RandomNumbers. |
Príklad jazyka 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)