Collabora Office 24.04 Súgó
Egy 0 és 1 közötti véletlen számot ad eredményül.
Rnd [(Kifejezés)]
Double
Kifejezés: Nincs hatása, megadása esetén figyelmen kívül marad.
Az Rnd függvény decimális törteket ad vissza 0 (beleértve) és 1 (nem beleértve) között egyenletes eloszlásnak megfelelően, a Mersenne Twister 19937 véletlenszám-generátor használatával. Adott tartománybeli véletlen egész számok előállításához használjon a lenti példához hasonló függvényt. Előtte használható egy Randomize utasítás adott kezdőértékkel, ha számok előre jelezhető sorozatára van szükség.
Sub ExampleRandomSelect
Dim iVar As Integer
iVar = Int((15 * Rnd) -2)
Select Case iVar
Case 1 To 5
Print "1 és 5 közötti szám"
Case 6, 7, 8
Print "6 és 8 közötti szám"
Case Is > 8 And iVar < 11
Print "Nagyobb mint 8"
Case Else
Print "1-10 tartományon kívül eső"
End Select
End Sub