<div dir="ltr"><div dir="ltr">Hi,<br>can this be a correct use of the array Shuffle method?<br><br>[code]<br>Public Sub Main()<br><br>  Dim aBingo As New Byte[]<br>  Dim iPull As Byte<br><br>  For i As Byte = 0 To 89<br>    aBingo.Push(i + 1)<br>  Next<br>  aBingo.Shuffle()<br>  iPull = aBingo[aBingo.Max]<br>  Print "Extract "; iPull; "\n"<br>  aBingo.Resize(aBingo.Max - 1)<br>  '-------------------------------<br>  Print "Checking:"<br>  aBingo.Sort()<br>  For Each i In aBingo<br>    Print i<br>  Next<br><br>End<br>[/code]<br><br>Regards<br>Gianluigi<br></div></div>