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
Pon el truco en tus favoritos
Trucos relacionados de Uso de Random
-
Truco de Visual Basic 6.0, 5 funciones de fechas
Gracias a este truco de visual basic 6.0 podrás: Saber la cantidad de días de un año determinado
Calcular la cantidad de días de un mes específico
Averiguar si un día corresponde a un fin de semana
Averiguar el último día de un Mes determinado
Ave
