Trucos de Visual Basic 6.0 Uso de Random


La función Rnd o Random posee la virtud de obtener números aleatorios entre 0 y 1:

El único inconveniente a la hora de usar Rnd, es que hay que inicializarlo, en otro caso,
el resultado de la función Rnd, será siempre el mismo dentro de un determinado ordenador.
Por ejemplo, el código:


Private Sub Form_Load()
Dim Num As Double
Num = Rnd
MsgBox Num
End Sub

Nos daría como resultado siempre el mismo número.

Para solucionar este problema, debemos escribir la sentencia Randomize antes de llamar
a la función Rnd. De esta manera, la función Rnd actuará correctamente.

El código quedaría así:


Private Sub Form_Load()
Dim Num As Double
Randomize
Num = Rnd
MsgBox Num
End Sub

Comentarios sobre Uso de Random

RODOLFO SEALES POSADA dice:

gracias, como podria yo dimensionar a que el numero aleatorio que se asigne, solo corresponda a un rango determinado por el numero de filas de una base de datos, que a su vez es variable? me explico... supongase que twengo una base de datos con una cantidad N de registros, pero posteriormente, ella vga cambiando a N+1, N+2, etc.... hasta llegar a una N+n, por decirlo asi. quiero que el numero solo me cumpla dicho rango. que codigo debo escribir? Gracias. Favor enviarmelo a mi correo.
Comentario publicado 21/03/2010 18:30:00
Dejar un comentario
Nombre:

Mail:

Web:

Comentario: