Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: ltbl en 9 Diciembre 2010, 23:10 pm



Título: Numeros Aleatorios
Publicado por: ltbl en 9 Diciembre 2010, 23:10 pm
Hola. Hay más posts sobre este tema en el foro pero he visto varias respuestas diferentes.

La duda es: ¿realmente cómo genero un numero aleatorio en un determinado rango?

La ultima combinación con la que he probado es:
Código
  1. (minimo - maximo + 1) * Rnd() + maximo
pero no es correcta :-\

EDITO: Haciendo pruebas al final he dado con la siguiente, que parece funcionar:
Código
  1. (minimo - maximo) * Rnd() + maximo
tambmien la he estado probando un buen rato pero no funcionaba porque generaba directamente el aleatorio en un textbox.


Título: Re: Numeros Aleatorios
Publicado por: agus0 en 9 Diciembre 2010, 23:50 pm
Usa el Buscador, Es muy Facil!!

------>

(http://t0.gstatic.com/images?q=tbn:ANd9GcTnMU-6W4RmSyBEa3w63NeQYkL1xIaAi2rM5CYPcOqFo67U3OFc) (http://www.recursosvisualbasic.com.ar/htm/trucos-codigofuente-visual-basic/71.htm#1)
(Clic en la LUPA)


Título: Re: Numeros Aleatorios
Publicado por: ~ Ghost_Networks ~ en 10 Diciembre 2010, 00:25 am
mmm no se yo se q en VB se usa el Randomize o algo asi y pones el codigo y t genera numeros al azar, pero VB no es mi fuerte XD mejor dicho, la programacion no es imi fuerte


Título: Re: Numeros Aleatorios
Publicado por: BlackZeroX en 10 Diciembre 2010, 03:26 am
.

Código
  1.  
  2. Public Function NumeroAleatorio(MinNum As Long, MaxNum As Long) As Long
  3. Dim Tmp                                 As Long
  4.    If MaxNum < MinNum Then: Tmp = MaxNum: MaxNum = MinNum: MinNum = Tmp
  5.    Randomize: NumeroAleatorio = (MinNum - MaxNum) * Rnd + MaxNum
  6. End Function
  7.  
  8.