• Viernes 8 de Noviembre de 2024, 20:45

Autor Tema:  Generar Randómicos  (Leído 1356 veces)

Can3lita

  • Nuevo Miembro
  • *
  • Mensajes: 23
    • Ver Perfil
Generar Randómicos
« en: Domingo 26 de Junio de 2005, 18:21 »
0
Alguien puede ayudarme con esto?
Necesito generar la sumatoria de 12 números aleatorios :/

Código: Text
  1.  Private Function generarZ() As Double
  2.  
  3.         Dim moRandom As New Random
  4.         Dim sumaRandomicos As Double
  5.         Dim acumulador As Double
  6.  
  7.         For intContadorRandomicos As Integer = 1 To 12
  8.             acumulador = acumulador + Math.Round(moRandom.NextDouble, 2)
  9.  
  10.         Next
  11.  
  12.         sumaRandomicos = acumulador
  13.         Return sumaRandomicos
  14.  
  15.     End Function
  16.  

 :blink:  :unsure:

[/b][/color][/size]

senzao18

  • Miembro HIPER activo
  • ****
  • Mensajes: 553
    • Ver Perfil
Re: Generar Randómicos
« Respuesta #1 en: Lunes 27 de Junio de 2005, 17:39 »
0
random.netxtdouble devuelve un número aleatorio entre 0.0 y 1.0.

usa con .next u otra de sus variantes.
---------------------------------------
Erick Aragon Zepeda
Dessarrollo de Aplicaciones .NET
http]
Blog de Articulos
Mi Blog
NoSolocodigo -->