mmm jeje me quede pensado... mira esto:
Numero = Rnd * 10000000 + 2
por lo q fui entendiendo a lo largo de este tema... lo q estaria haciendo seria tirar valores random menores q 10000000 al el cual puede ser 1 o 0 pero luego le suma 2 lo q lo hace mayor...
pero fijate por este lado.. si el numero q tira es 9999999 y le suma 2 quedaria 10000001 lo q se pasa de tu condicion 10000000
creo q mi razonamiento esta bien... a si q tendrias q poner asi:
Numero = Rnd * 9999998 + 2
mira lo probe de esta forma... la cual afirma mi razonamiento
:
Dim Numero As Long
Private Sub Command1_Click()
Numero = Rnd * 3 + 1
Text1.Text = Numero
End Sub
y bueno... para no seguir posteando queria decirte q toy feliz de q hayamos podido arreglar esto jeje... ya q yo no se mucho... pero entre los dos la sacamos
Autor
En línea
