Intersecare insiemi

[rescueme]

Esiste una struttura dati (una Collection, un Set) che mi permetta di effettuare l'intersezione? Mi spiego meglio, vorrei sapere se esiste qualcosa di questo tipo

Dim insieme1 As New Set() = {1, 2, 3, 4, 5}
Dim insieme2 As New Set() = {1, 2, 6, 7}
Dim insieme3 As Set() = insieme1.Interseca(insieme2) 

in modo che insieme3 contenga {1, 2}

[pietro09]

        Dim insieme1 As New List(Of Integer)(New Integer() {1, 2, 3, 4, 5})
        Dim insieme2 As New List(Of Integer)(New Integer() {1, 2, 6, 7})

        Dim insieme3 As IEnumerable(Of Integer) = insieme1.Intersect(insieme2)

        For Each el In insieme3
            PrintLn(el) ' ==> {1, 2}
        Next

[rescueme]

Grazie infinite! Ho visto però che devo usare LINQ per fare ciò.
Ti ringrazio per la soluzione!!

[pietro09]

Originariamente inviato da rescueme
Grazie infinite! Ho visto però che devo usare LINQ per fare ciò.
Ti ringrazio per la soluzione!!

:quote: Quello è facile. Mi piacerebbe farlo con classi di oggetti più complessi, ma purtroppo non sono riuscito
Se ci riesci, manda la soluzione. Ciao.