IBM Lotus Symphony
|
Vráti náhodné číslo medzi 0 a 1.
Funkcia Rnd [(Výraz)]
Typ Double
Výraz: ľubovoľný numerický výraz, ktorý definuje ako generovať náhodné čísla.
Menšie ako nula: vždy vracia rovnaké náhodné číslo.
Väčšie ako nula: vracia nasledujúce náhodné číslo v postupnosti.
Nula: vracia posledné generované náhodné číslo.
Vynechanie: vracia nasledujúce náhodné číslo v postupnosti.
Ak sa odovzdáva rovnaké číslo každému za sebou nasledujúcemu volaniu funkcie Rnd, generuje sa rovnaká postupnosť náhodných čísel. Je to tak preto, lebo parameter výrazu sa používa ako začiatočný bod pre ďalšie číslo.
Funkcia Rnd iba vracia hodnoty v rozsahu od 0 do 1. Na generovanie náhodných celých čísel v zadanom rozsahu použite vzorec v nasledujúcom príklade:
Sub Príklad_Random Select
Dim iVar ako typ Integer
iVar = Int((15 * Rnd) -2)
Select Case iVar
Case 1 To 5
Print "Čísla od 1 do 5"
Case 6, 7, 8
Print "Číslo od 6 do 8"
Case Is > 8 And iVar < 11
Print "Väčší ako 8"
Case Else
Print "Mimo rozsahu 1 až 10"
End Select
end sub