[VB.Net]Escludere dei numeri

[Janx]

Ti faccio un esempio completo.

Metti il codice ad esempio al Click di un pulsante.
Avrai una generazione casuale di 6 numeri, da 1 a 90, esclusi i numeri che non vuoi considerare.

Dim Numeri As New ArrayList 
For i = 1 To 90 
    Numeri.Add(i) 
Next 
Dim Ignoranumeri() As Integer = {5, 9, 11, 20} 
For Each i As Integer In Ignoranumeri 
    Numeri.Remove(i) 
Next 

Dim Estrazione(5) As Byte 
Dim Posizione As Byte = 0
Randomize() 
Dim Risultato As New System.Text.StringBuilder 
For i = 0 To Estrazione.Length - 1 
    Posizione = New Random().Next(Numeri.Count - 1) 
    Estrazione(i) = Numeri(Posizione) 
    Numeri.RemoveAt(Posizione) 
    System.Threading.Thread.Sleep(50) 
Next 
Array.Sort(Estrazione) 
For i As Integer = 0 To Estrazione.Count - 1 
    Risultato.Append(Estrazione(i) & " ") 
Next 

MessageBox.Show(Risultato.ToString)