Lambda 如何将此函数从C#转换为VB.net

我需要你的帮助。我试图将这段代码转换成vb.net，但我做不到。即使我使用了多个代码转换器，但结果是两行代码出错

以下是c#代码：

我无法解析的两行代码是IF-ELSE条件下的代码行

多谢各位

我找到了下面的代码，我要试试。它位于以下链接中：

public List<T> SortByPropertyName(string propertyName, bool ascending)
    {
        //Create a Lambda expression to dynamically sort the data.
        var param = Expression.Parameter(typeof(T), "N");

        var sortExpresseion = Expression.Lambda<Func<T, object>>
            (Expression.Convert(Expression.Property(param, propertyName), typeof(object)), param);

        if (ascending)
        {
            return this.AsQueryable<T>().OrderBy<T, object>(sortExpresseion).ToList<T>();
        }
        else
        {
            return this.AsQueryable<T>().OrderByDescending<T, object>(sortExpresseion).ToList<T>();
        }
    }

        Public Function SortByPropertyName(propertyName As String, ascending As Boolean) As List(Of T)
        'Create a Lambda expression to dynamically sort the data.
        Dim param = Expression.Parameter(GetType(T), "N")

        Dim sortExpresseion = Expression.Lambda(Of Func(Of T, Object))(Expression.Convert(Expression.[Property](param, propertyName), GetType(Object)), param)

        If ascending Then
            Return Me.AsQueryable(Of T)().OrderBy(Of T, Object)(sortExpresseion).ToList(Of T)()
        Else
            Return Me.AsQueryable(Of T)().OrderByDescending(Of T, Object)(sortExpresseion).ToList(Of T)()
        End If
    End Function