Gibt einen Wert des Typs Single zurück, der eine Zufallszahl enthält.
Syntax
Rnd[(Zahl)]
Das optionaleZahlenargument ist ein einzelner oder ein beliebiger gültiger numerischer Ausdruck.
Rückgabewerte
| Zahl | Rnd-Ergebnis |
|---|---|
| Kleiner als null | Jedes Mal die gleiche Zahl, wobei die Zahl als Ausgangswert verwendet wird. |
| Größer als null | Die nächste Zufallszahl in der Folge. |
| Gleich null | Die zuletzt erzeugte Zahl. |
| Nicht angegeben | Die nächste Zufallszahl in der Folge. |
Hinweise
Die Funktion Rnd gibt einen Wert unter 1, aber größer als oder gleich null zurück.
Der Wert der Zahl bestimmt, wie Rnd eine Zufallszahl generiert:
Es wird für einen Startwert immer dieselbe Zahlenfolge erzeugt, da bei jedem nachfolgenden Aufruf der Rnd-Funktion die vorherige Zahl als Startwert für die nächste Zahl in der Folge verwendet wird.
Verwenden Sie vor dem Aufrufen von Rnd die Randomize-Anweisung ohne Argument, um den Zufallszahlengenerator mit einem Startwert zu initialisieren, der auf dem Systemtimer basiert.
Um zufällige Ganzzahlen in einem bestimmten Zahlenbereich zu erzeugen, verwenden Sie diese Formel:
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
Dabei ist upperbound die größte und lowerbound die kleinste Zahl im Bereich.
Hinweis
Um Folgen von Zufallszahlen zu wiederholen, rufen Sie Rnd mit einem negativen Argument direkt auf, bevor Sie Randomize mit einem numerischen Argument verwenden. Wenn Randomize mit demselben Wert für Zahl verwendet wird, wird die vorherige Folge nicht wiederholt.
Abfragebeispiel
| Ausdruck | Ergebnisse |
|---|---|
| SELECT ProductSales.ProductID, Rnd([Discount]) AS RandomNumbers FROM ProductSales; | Gibt die Produkt-ID zusammen mit Zufallszahlen in der Spalte "Zufallszahlen" zurück. |
VBA-Beispiel
Hinweis
Die folgenden Beispiele zeigen die Verwendung dieser Funktion in einem VBA-Modul (Visual Basic for Applications). Wenn Sie weitere Informationen zum Arbeiten mit VBA wünschen, wählen Sie Entwicklerreferenz in der Dropdownliste neben Suchen aus, und geben Sie einen oder mehrere Begriffe in das Suchfeld ein.
In diesem Beispiel wird mit der Rnd-Funktion ein zufälliger ganzzahliger Wert zwischen 1 und 6 erzeugt.
Dim MyValue
' Generate random value between 1 and 6.
MyValue = Int((6 * Rnd) + 1)