IBM Lotus Symphony
|
Devuelve un número aleatorio entre 0 y 1.
Rnd [(Expresión)]
Doble
Expresión: Cualquier expresión numérica que defina cómo generar números aleatorios.
Menor que cero: Siempre devuelve el mismo número aleatorio.
Mayor que cero: Devuelve el siguiente número aleatorio de la secuencia.
Cero: Devuelve el número aleatorio que se generó la última vez.
Omitido: Devuelve el siguiente número aleatorio de la secuencia.
Si se pasa el mismo número en cada llamada sucesiva a la función Rnd, se genera la misma secuencia de números aleatorios. Esto se debe a que el parámetro Expresión se usa como punto de inicio del siguiente número.
La función Rnd sólo devuelve valores que van de 0 a 1. Para generar enteros aleatorios dentro de un rango determinado, use la fórmula que se incluye en el ejemplo siguiente:
Sub EjemploSelecAleatoria
Dim iVar As Integer
iVar = Int((15 * Rnd) -2)
Select Case iVar
Case 1 To 5
Print "Número de 1 a 5"
Case 6, 7, 8
Print "Número de 6 a 8"
Case Is > 8 And iVar < 11
Print "Mayor de 8"
Case Else
Print "Fuera del rango de 1 a 10"
End Select
end sub