Rnd

 Top  Previous  Next

function Rnd() As Single

 

Die Rnd-Funktion gibt einen zufälligen Wert zurück, der kleiner als 1, aber größer oder gleich 0 ist.

 

Verwenden Sie die folgende Formel, um ganze Zufallszahlen innerhalb eines bestimmten Bereichs zu erzeugen:

randomvalue = Trunc((upperbound - lowerbound + 1) * Rnd() + lowerbound)

 

Beispiel:

Dim v
 
v = Rnd
' returns eg. v = 0,262725505512208
 
v = CInt(Rnd * 1000)
' returns eg. v = 673