2

誰かがこれに答えたと確信していますが、それを見つけるための正しい検索用語を見つけるのに苦労しています...

すべての値をループすることでこれを確実に実行できますが、もっと簡単な方法を誰かが知っているかどうかを確認しているだけです。

Dim List1 As New List(Of Integer) From {1,3,5,7}

Dim List2 As New List(Of Integer) From {2,4,6,8}

List1.ContainsAnythingFrom(List2) = False

どちらのリストにも一致する番号がないためです。

Dim List1 As New List(Of Integer) From {1,**3**,5,7}

Dim List2 As New List(Of Integer) From {2,**3**,6,8}

List1.ContainsAnythingFrom(List2) = True

各リストに 3 があるためです。

私は、ContainsAnythingFromタイプの関数を探しています。

4

2 に答える 2

5

Enumerable.Intersect LINQ メソッドを使用して共通項目を見つけることができます

Dim list1 = New Integer() {1, 2, 3, 4, 5}
Dim list2 = New Integer() {3, 4, 5, 6}
Dim list3 = New Integer() {7, 8}

Dim list1HasAnyOfList2 = list1.Intersect(list2).Any()
' true

Dim list1HasAnyOfList3 = list1.Intersect(list3).Any()
' false
于 2013-01-03T15:40:38.207 に答える
0 
 Dim l1 As New List(Of String) From {"a", "b", "c", "d"}

    Dim l2 As New List(Of String) From {"e", "f", "c", "d"}

    Dim intersection As IEnumerable(Of String) = l1.Intersect(l2)

    '  Dim result As List(Of String) = l1.Intersect(l2).ToList()

    For Each s In intersection
        Console.WriteLine(s)
    Next
于 2013-09-17T09:13:13.777 に答える