Удаление повторяющихся элементов из списка с несколькими столбцами

Что ж, вам понадобится какой-нибудь метод для определения того, являются ли два объекта ListViewItem дубликатами.

Как только это будет сделано, реализация будет довольно простой.

Допустим, вы хотите считать два элемента одинаковыми, если текст в первом столбце одинаковый (например). Затем вы можете написать быструю реализацию IEqualityComparer<ListViewItem>, например:

class ListViewItemComparer : IEqualityComparer<ListViewItem>
{
    public bool Equals(ListViewItem x, ListViewItem y)
    {
        return x.Text == y.Text;
    }

    public int GetHashCode(ListViewItem obj)
    {
        return obj.Text.GetHashCode();
    }
}

Затем вы можете удалить дубликаты следующим образом:

static void RemoveDuplicateListViewItems(ListView listView)
{
    var uniqueItems = new HashSet<ListViewItem>(new ListViewItemComparer());

    for (int i = listView.Count - 1; i >= 0; --i)
    {
        // An item will only be added to the HashSet<ListViewItem> if an equivalent
        // item is not already contained within. So a return value of false indicates
        // a duplicate.
        if (!uniqueItems.Add(listView.Items[i]))
        {
            listView.Items.RemoveAt(i);
        }
    }
}

ОБНОВЛЕНИЕ: приведенный выше код удаляет дубликаты любых элементов, которые появляются в ListView более одного раза; то есть он оставляет по одному экземпляру каждого. Если на самом деле вы хотите удалить все экземпляры любых элементов, которые появляются более одного раза, подход немного отличается.

Вот один из способов сделать это. Сначала определите следующий метод расширения:

public static bool CountAtLeast<T>(this IEnumerable<T> source, int minimumCount)
{
    int count = 0;
    foreach (T item in source)
    {
        if ((++count) >= minimumCount)
        {
            return true;
        }
    }

    return false;
}

Затем найдите дубликаты следующим образом:

static void RemoveDuplicateListViewItems(ListView listView)
{
    var duplicates = listView.Items.Cast<ListViewItem>()
        .GroupBy(item => item.Text)
        .Where(g => g.CountAtLeast(2))
        .SelectMany(g => g);

    foreach (ListViewItem duplicate in duplicates)
    {
        listView.Items.RemoveByKey(duplicate.Name);
    }
}

ОБНОВЛЕНИЕ 2. Похоже, вы уже смогли преобразовать большую часть вышеперечисленного в VB.NET. Строка, которая вызывает у вас затруднения, может быть записана следующим образом:

' Make sure you have Option Infer On. '
Dim duplicates = listView.Items.Cast(Of ListViewItem)() _
    .GroupBy(Function(item) item.Text) _
    .Where(Function(g) g.CountAtLeast(2)) _
    .SelectMany(Function(g) g)

Кроме того, если у вас возникли проблемы с использованием метода CountAtLeast описанным выше способом, вам необходимо использовать атрибут ExtensionAttribute для написания методов расширения в VB.NET:

Module CountAtLeastExtension

    <Extension()> _
    Public Function CountAtLeast(Of T)(ByVal source As IEnumerable(Of T), ByVal minimumCount As Integer) As Boolean
        Dim count  = 0
        For Each item in source
            count += 1
            If count >= minimumCount Then
                Return True
            End If
        Next

        Return False
    End Function

End Module