La función Rnd devuelve un valor menor que 1, pero mayor o igual a cero.

El valor de Number determina la forma en que Rnd genera un número aleatorio.

Para cualquier valor de inicialización dado, se genera la misma secuencia de números ya que cada llamada sucesiva que se hace a la función Rnd utiliza el número anteriormente generado como inicialización para el siguiente número de la secuencia.

Antes de llamar a la función Rnd, utilice la instrucción Randomize sin argumento para inicializar el generador de números aleatorios con un valor de inicialización basado en el temporizador del sistema.

Para producir enteros aleatorios en un intervalo dado, utilice la siguiente fórmula.

randomvalue = CInt(Int((upperbound - lowerbound + 1) * Rnd() + lowerbound))

Aquí, upperbound es el número mayor en el intervalo y lowerbound es el número menor.

Nota
Para repetir secuencias de números aleatorios, llame a la función Rnd con un argumento negativo justo antes de utilizar Randomize con un argumento numérico. Si utiliza Randomize con el mismo valor que Number, no se repetirá la secuencia anterior.

Nota de seguridad
Debido a que la instrucción Random y la función Rnd comienzan con un valor de inicialización y generan números que quedan dentro de un intervalo finito, otra persona que conozca el algoritmo utilizado para generar los resultados puede predecirlos. Por tanto, la instrucción Random y la función Rnd no se deben utilizar para generar números aleatorios utilizados en criptografía.

En el siguiente ejemplo se utiliza la función Rnd para generar un valor entero aleatorio en el intervalo entre 1 y 6.

' Initialize the random-number generator.
Randomize()
' Generate random value between 1 and 6.
Dim value As Integer = CInt(Int((6 * Rnd()) + 1))

Espacio de nombres: Microsoft.VisualBasic

Módulo: VBMath

Ensamblado: Visual Basic Runtime Library (en Microsoft.VisualBasic.dll)

Referencia