Vrátí hodnotu typu Single obsahující náhodné číslo.
Syntaxe
Rnd[(číslo)]
Volitelný argument čísloje jeden nebo libovolný platný číselný výraz.
Vrácené hodnoty
| Pokud je číslo | Generování funkce Rnd |
|---|---|
| Menší než nula | Pokaždé stejné číslo, přičemž jako počáteční číslo se používá číslo. |
| Větší než nula | Další náhodné číslo v pořadí. |
| Rovná se 0 | Naposledy vygenerované číslo. |
| Nedodáváno | Další náhodné číslo v pořadí. |
Poznámky
Funkce Rnd vrací hodnotu menší než 1, ale větší nebo rovnou nule.
Hodnota argumentu číslo určuje, jakým způsobem funkce Rnd vygeneruje náhodné číslo:
Pro libovolné počáteční číslo je generována stejná číselná řada, protože každé následující volání funkce Rnd používá předchozí číslo jako počáteční hodnotu pro další číslo v pořadí.
Před voláním Rnd použijte příkaz Randomize bez argumentu k inicializaci generátoru náhodných čísel pomocí počátečního data založeného na systémovém časovači.
Chcete-li vytvořit náhodná celá čísla v dané oblasti, použijte tento vzorec:
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
Horní mez je nejvyšší číslo v rozsahu a dolní mez je nejnižší číslo v rozsahu.
Poznámka
Chcete-li opakovat sekvence náhodných čísel, volejte Rnd se záporným argumentem bezprostředně před použitím funkce Randomize s číselným argumentem. Použití příkazu Randomize se stejnou hodnotou pro číslo neopakuje předchozí posloupnost.
Příklad dotazu
| Výraz | Výsledky: |
|---|---|
| SELECT ProductSales.ProductID, Rnd([Discount]) AS RandomNumbers FROM ProductSales; | Vrátí ID výrobku spolu s náhodnými čísly ve sloupci RandomNumbers. |
Příklad jazyka VBA
Poznámka
Následující příklady ukazují použití této funkce v modulu VBA (Visual Basic pro Applications). Pokud chcete další informace o práci s modulem VBA, vyberte Referenční informace pro vývojáře, které najdete v rozevíracím seznamu vedle položky Hledat a do vyhledávacího pole napište požadované pojmy.
V tomto příkladu se funkce Rnd používá ke generování náhodné celočíselné hodnoty od 1 do 6.
Dim MyValue
' Generate random value between 1 and 6.
MyValue = Int((6 * Rnd) + 1)