Visual Basic - Codificacion de sorteo

Life is soft - evento anual de software empresarial
   
Vista:

Codificacion de sorteo

Publicado por farel (3 intervenciones) el 08/05/2014 01:36:24

Hola



Estoy haciendo un programa de rifas, y quiero hacerlo de manera, que el usuario pueda ingresar el limite inferior y el ultimo numero. Pero me ha ocurrido un problema que es a la hora de la codificacion con los limites de numeros que hara el usuario yo se que para hacer el sorteo aleatorio debo hacer esto por ejemplo:
1
x = Int (-99 * Rnd + 100)

Aqui quiero un numero desde el 1 hasta el 100,, pero lo que yo quiero es un numero que sea desde el 50,, hasta el 850,,

QUISIERA AYUDA POR FAVOR!!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Codificacion de sorteo

Publicado por pedro luis (56 intervenciones) el 08/05/2014 15:20:41
La ayuda dice
1
Int((Límite_superior - límite_inferior + 1) * Rnd + límite_inferior)

Para que lo entiendas mejor te pongo un ejemplo hecho a golpe de calcetin

1
2
3
4
5
6
7
8
Dim numero As Integer
Private Sub Command1_Click()
Randomize                                 ' Iniciar numero aleatorio con el reloj del sistema
numero = Int(850 * Rnd) + 1      ' el rnd nunca es uno
If numero >= 50 Then
Text1 = numero
End If
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar