Devuelve un tipo de datos Single que contiene un número aleatorio.
Sintaxis
Nd[(número)]
El argumento de númeroopcional es una expresión numérica Single o cualquier expresión numérica válida.
Valores devueltos
| Si el número es | N.Rn.S genera |
|---|---|
| Menor que cero | El mismo número cada vez, usando el número como semilla. |
| Mayor que cero | El siguiente número aleatorio de la secuencia. |
| Igual a cero | El número generado más recientemente. |
| No suministrado | El siguiente número aleatorio de la secuencia. |
Observaciones
La función NúmN devuelve un valor menor que 1, pero mayor o igual que cero.
El valor de número determina cómo Dar genera un número aleatorio:
Para cualquier inicialización dada, se genera la misma secuencia numérica porque cada llamada sucesiva a la función Númium usa el número anterior como inicialización para el siguiente número de la secuencia.
Antes de llamar a Rnd, use la instrucción Randomize sin un argumento para inicializar el generador de números aleatorios con una semilla basada en el temporizador del sistema.
Para generar enteros aleatorios en un rango dado, use esta fórmula:
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
Aquí, upperbound es el número más alto del rango y lower bound es el número más bajo del rango.
Nota
Para repetir secuencias de números aleatorios, llame a Rnd con un argumento negativo inmediatamente antes de usar Aleatorizar con un argumento numérico. Al usar Aleatorizar con el mismo valor para el número, no se repite la secuencia anterior.
Ejemplo de consulta
| Expresión | Resultados |
|---|---|
| SELECT ProductSales.ProductID, Rnd([Discount]) AS RandomNumbers FROM ProductSales; | Devuelve el id. de producto junto con números aleatorios en la columna RandomNumbers. |
Ejemplo VBA:
Nota
Los ejemplos siguientes muestran el uso de esta función en un módulo de Visual Basic para Aplicaciones (VBA). Para obtener más información sobre cómo trabajar con VBA, seleccione referencia para desarrolladores en la lista desplegable situada junto a búsqueda y escriba uno o varios términos en el cuadro de búsqueda.
En este ejemplo se usa la función Númium para generar un valor entero aleatorio de 1 a 6.
Dim MyValue
' Generate random value between 1 and 6.
MyValue = Int((6 * Rnd) + 1)