c# - Linq 表达式 : Perform Distinct on a list dynamic property

Question

我有一个对象列表，我需要在这些对象上执行 Distinct() 函数。目前我使用以下代码。

Return choices = displaylist
    .Select(Function(x) x.Zone)
    .ToList
    .Distinct()

上面的代码对我来说效果很好。但是，我需要将此代码扩展为允许我提供任何属性名称并返回列表的不同值的代码。我的自定义对象有 20 多个属性，例如区域、地区、部门等

我需要创建一个灵活的函数，我可以给任何属性名称并返回不同的值。像这样的伪:

Function GetDistincts(PROPERTYNAME as string)
    Return choices = displaylist
        .Select(Function(x) x.[PROPERTYNAME])
        .ToList
        .Distinct()
End Function

我相信这是 Linq 表达式的工作。但我不擅长。所以在这里需要帮助。

谢谢!

Answer 1

您可以创建自定义通用扩展方法。另外，请注意，您应该在调用 ToList 之前调用 distinct before，因为这将编译表达式；降低查询效率。

Dim result = displaylist.Property("Zone").Distinct().ToList()

Imports System.ComponentModel
Imports System.Runtime.CompilerServices

Public Module Extensions

    <Extension()>
    Public Function [Property](Of TSource)(source As IEnumerable(Of TSource), name As String) As IEnumerable(Of Object)
        Dim descriptor As PropertyDescriptor = TypeDescriptor.GetProperties(GetType(TSource)).Find(name, True)
        Return source.Select(Function(item As TSource) descriptor.GetValue(item))
    End Function

    <Extension()>
    Public Function [Property](Of TSource, TResult)(source As IEnumerable(Of TSource), name As String) As IEnumerable(Of TResult)
        Dim descriptor As PropertyDescriptor = TypeDescriptor.GetProperties(GetType(TSource)).Find(name, True)
        Return source.Select(Function(item As TSource) CType(descriptor.GetValue(item), TResult))
    End Function

End Module