Vrátí hodnotu typu Single obsahující náhodné číslo.

Syntaxe

Rnd[(číslo)]

Nepovinný číselnýArgument je Jeden nebo jakýkoli platný Číselný výraz.

Návratové hodnoty

Pokud je číslo

Rnd generuje

Menší než nula

Pokaždé stejné číslo, pomocí čísla jako Počáteční hodnota.

Větší než nula

Další náhodné číslo v pořadí.

Rovná se nule

Poslední vygenerované číslo.

Nezadávaná

Další náhodné číslo v pořadí.

Poznámky

Funkce Rnd vrátí hodnotu menší než 1, ale větší než nebo rovna nule.

Hodnota čísla určuje, jak Rnd vygeneruje náhodné číslo:

Pro každé počáteční počáteční číslo se vygeneruje stejná číselná řada, protože každé následné volání funkce Rnd používá předchozí číslo jako počáteční hodnotu pro další číslo v posloupnosti.

Před voláním Rndpoužijte příkazRandomize bez argumentu k inicializaci generátoru náhodných čísel se seed založeným na systémovém časovači.

Pokud chcete v dané oblasti vytvořit náhodná celá čísla, použijte tento vzorec:

Int((upperbound - lowerbound + 1) * Rnd + lowerbound)

Tady je horní příchozí číslo nejvyšší číslo v oblasti a dolní číslo je nejnižší číslo v oblasti.

Poznámka:  Chcete-li opakovat posloupnosti náhodných čísel, zavolejte Rnd se záporným argumentem bezprostředně před použitím funkce Randomize s číselným argumentem. Použití funkce Randomize se stejnou hodnotou pro číslo neopakuje předchozí sekvenci.

Příklad dotazu

Výraz

Výsledky

SELECT ProductSales.ProductID, Rnd([Discount]) AS RandomNumbers FROM ProductSales;

Vrátí ID produktu 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.

Tento příklad používá funkci Rnd k vygenerování náhodné celočíselné hodnoty od 1 do 6.

Dim MyValue' Generate random value between 1 and 6.MyValue = Int((6 * Rnd) + 1)

Potřebujete další pomoc?

Chcete další možnosti?

Prozkoumejte výhody předplatného, projděte si školicí kurzy, zjistěte, jak zabezpečit své zařízení a mnohem více.

Komunity vám pomohou klást otázky a odpovídat na ně, poskytovat zpětnou vazbu a vyslechnout odborníky s bohatými znalostmi.