Pregunta de programación de VB: escriba un procedimiento de función que genere números enteros aleatorios entre 1 y 100

La función Rnd genera un número aleatorio entre 0 y 1, y el rango es un entero aleatorio entre, luego int(Rnd*98)+2 genera un número entero aleatorio entre, que cumple con el objetivo Un número aleatorio entre 1 y 100.

El código de la función es el siguiente:

Public?Function?sj()?As?Integer

Aleatorio

sj?= ?Int( Rnd?*?98)?+?2

Fin?Función

Información ampliada:

Sintaxis:

Rnd [(number )]

Si el valor del número se genera mediante Randomize

menor que 0, se obtendrá el mismo resultado utilizando el número como semilla de número aleatorio cada vez.

Mayor que 0, el número aleatorio anterior se utiliza como semilla para generar el siguiente número aleatorio.

Igual a 0, lo que produce el mismo número aleatorio que el número aleatorio generado más recientemente.

Omitido, el número aleatorio anterior se utiliza como semilla para generar el siguiente número aleatorio.

Descripción:

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

El valor del número determina cómo Rnd genera números aleatorios.

Se generará la misma secuencia para la semilla dada inicialmente, porque cada llamada a la función Rnd utiliza el número anterior en la secuencia como semilla para el siguiente número.

Antes de llamar a Rnd, primero use la instrucción ?Randomize sin parámetros para inicializar el generador de números aleatorios (si toma parámetros, generará una secuencia específica de números aleatorios correspondientes a los parámetros). según el sistema El temporizador obtiene la semilla.

Para generar un número entero aleatorio dentro de un rango, utilice la siguiente fórmula:

Int((límite superior - límite inferior + 1) * Rnd + límite inferior)

Aquí , el límite superior es el límite superior del rango de números aleatorios y el límite inferior es el límite inferior del rango de números aleatorios.

Nota Si desea obtener una secuencia repetida de números aleatorios, llame a Rnd con un valor de parámetro negativo directamente antes de usar Randomize con un parámetro numérico. El uso de Randomize con el mismo valor numérico no dará como resultado secuencias repetidas de números aleatorios.

Material de referencia: Enciclopedia Baidu - rnd (función aleatoria)