18/05/2009, 07:14
|
| | | Fecha de Ingreso: abril-2007
Mensajes: 163
Antigüedad: 17 años, 10 meses Puntos: 2 | |
| Respuesta: funcionpara generar numeros aleatorios nunca iguales VB.NET
Private Function genera(ByVal max As Integer, Optional ByVal zero As Boolean = False) As Integer
Dim randNumber as New Random(DateTime.Now.Millisecond)
if zero=true then return 0
return randNumber .Next(0, max)
end function |