vb.net - 用于对具有空值的字段进行排序的表达式 Lambda

Question

我使用动态方法来排序对象列表。

For Each Sort In MesDonnees.MesOptions
    If Sort.Sens < 2 Then
        Dim sortPropertyName As String = Sort.ColName

        If (TypeClass.GetProperties().Any(Function(prop) prop.Name = sortPropertyName AndAlso prop.CanRead)) Then

            'Information sur la propriété recherchée
            Dim pinfo As PropertyInfo = TypeClass.GetProperty(sortPropertyName)

            Dim Expr As Expression = Expression.Property(paramExpr, pinfo)
            Dim Tostr As Expression = Expression.Call(Expr, "ToString", Nothing)

            Dim orderByFunc As Func(Of MaClass, Object) = Expression.Lambda(Of Func(Of MaClass, Object))(Tostr, paramExpr).Compile()
            Dim sortFunc As Func(Of IEnumerable(Of MaClass), IOrderedEnumerable(Of MaClass)) = Nothing

            If (Not CBool(Sort.Sens)) Then
                sortFunc = (Function(source) source.OrderBy(orderByFunc))
            Else
                sortFunc = (Function(source) source.OrderByDescending(orderByFunc))
            End If

            query = sortFunc(query).ToList()

        End If
    End If
Next

Sort.ColName 是我要过滤的字段的名称。

当我没有空值时，它是完美的，但是当我有空值时，我在行 query = sortFunc(query).ToList() 中收到异常:

Object reference not set to an instance of an object

我看到 Expression.Call 和 ISNullOrEmpty 的代码不同，但我不知道在我的情况下如何正确使用它。我希望 null 或 Empty 像“”一样首先出现。

感谢您的帮助和解释

Answer 1

您可以更改 toStr 表达式以包含 Coalesce正确表达式是常量的运算。请注意，左侧表达式需要是引用类型(或可为 null 的值类型)，因此您还需要确保属性类型不是值类型。

这是一个应该有效的示例:

Dim toStr As Expression = Expression.Call(
    If(pinfo.PropertyType.IsValueType, expr, Expression.Coalesce(expr, Expression.Constant(String.Empty))),
    "ToString",
    Nothing
)