Gibt einen Wert des Typs Single zurück, der eine Zufallszahl enthält.
Syntax
Rnd[(Zahl)]
Das optionale Zahl-Argument ist vom Typ "Single" oder ein beliebiger gültiger Numerischer Ausdruck.
Rückgabewerte
|
Zahl |
Rnd -Ergebnis |
|
Kleiner als null |
Jedes Mal dieselbe Zahl, wobei Zahl als Startwert 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.
Durch den Wert von Zahl wird festgelegt, wie die Zufallszahl von Rnd erzeugt werden soll:
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 basierend auf dem Systemtimer zu initialisieren.
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 RandomNumbers 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)
