numeros aleatorios

Nombre	Descripción
	AccessibilityObject	Obtiene AccessibleObject asignado al control.(Heredado de Control).
	AccessibleDefaultActionDescription	Obtiene o establece la descripción de la acción predeterminada del control que usan las aplicaciones cliente de accesibilidad.(Heredado de Control).
	AccessibleDescription	Obtiene o establece la descripción del control que las aplicaciones cliente de accesibilidad utilizan.(Heredado de Control).
	AccessibleName	Obtiene o establece el nombre del control que las aplicaciones cliente de accesibilidad utilizan.(Heredado de Control).
	AccessibleRole	Obtiene o establece el rol accesible del control. (Heredado de Control).
	AllowDrop	Obtiene o establece un valor que indica si el control puede aceptar los datos que el usuario arrastra al mismo.(Heredado de Control).
	AllowSelection	Obtiene un valor que indica si la ListBox habilita actualmente la selección de elementos de lista.(Invalida ListControl.AllowSelection).
	Anchor	Obtiene o establece los bordes del contenedor al que está enlazado un control y determina cómo se cambia el tamaño de un control con su elemento primario.(Heredado de Control).
	AutoScrollOffset	Obtiene o establece a dónde se desplaza este control en ScrollControlIntoView.(Heredado de Control).
	Autorizare	Esta API admite la infraestructura producto y no está diseñada para usarse directamente desde el código. Esta propiedad no es relevante para esta clase.(Heredado de Control).

QUE SON LOS NÚMEROS ALEATORIOS VISUAL BASIC 6.0

Para generar números aleatorios evitando repeticiones de secuencias en Visual Basic 6, hay que utilizar esta instrucción:

Randomize Timer (Esta instrucción debe estar antes de la función Rnd())

Generar un número entre 0 y n:

minumero = Int ( Rnd ( ) x ( n+1 ) )

Generar un número entre 1 y n:

minumero = 1 + Int ( Rnd ( ) x n )

Generar un número entre m y n:

minumero = m + Int ( Rnd ( ) x ( n – m + 1 ) )

ejemplos de números aleatorios:

Crear el código de un programa que genera tres números enteros aleatorios A, B, C comprendidos entre 65 y 90, ambos inclusive, y los muestra en pantalla.

      Solución (para versiones de VB menos recientes):     

                   Rem Curso Visual Basic aprenderaprogramar.com

Option Explicit
Dim A%, B%, C As Integer

Private Sub Form_Load()
Randomize
A = Int(Rnd * 26) + 65
B = Int(Rnd * 26) + 65
C = Int(Rnd * 26) + 65
MsgBox ("A vale " & A & " ;B vale " & B & " ; C vale " & C)
End Sub