c# - LINQ 选择一列中具有 Max 且另一列中具有 Distinct 的行

Question

我正在使用 LINQ to Entities 查询以下 MS-SQL 表:

RateID  RateTypeID  Amount  EffectiveDate   IsRetired
------  ----------  ------  -------------   ---------
1       1           0.565   1/1/2013 0:00   FALSE
2       2           6.000   1/1/2013 0:00   FALSE
3       3           9.000   1/1/2013 0:00   FALSE
4       4           12.000  1/1/2013 0:00   FALSE
5       5           1.500   1/1/2013 0:00   FALSE
6       1           0.550   7/1/2012 0:00   FALSE
7       1           0.495   1/1/2012 0:00   FALSE
8       3           8.000   1/1/2011 0:00   FALSE
9       3           11.000  1/1/2015 0:00   FALSE
10      5           2.000   7/1/2013 0:00   TRUE

我想构建一个函数，该函数将使用 LINQ 返回一个 IQueryable(Of Rate)，然后我可以将其加入到其他查询中，以通过 RateTypeID。 IsRetired 必须为 false，我需要具有最近的过去 EffectiveDate 的行。

这是我得到的最接近的(LINQPad VB 语句):

Dim dateNow As Date = Date.Now
Dim result = (
    From r In Rates
    Where r.IsRetired = False And r.EffectiveDate <= dateNow
    Group r By r.RateTypeID
    Into rg = Group
    Select New With {
        .cr = rg.OrderByDescending(Function(r) r.EffectiveDate).Take(1)
    }
)
result.Dump()

此查询返回 DbQuery(Of AnonymousType_1(Of IEnumerable(Of Rate))) (每个集合都有 1 个费率项的集合)，这并不是我想要的。

此问答解决了一个非常相似的问题，但使用的是 SQL 而不是 LINQ: How can I SELECT rows with MAX(Column value), DISTINCT by another column in SQL?

我正在 vb.net 中编码，但也会采用 C# 答案。谢谢!

Answer 1

使用Take()返回IEnumerable<T>而FirstOrDefault()仅返回 <T> ，所以:

IQueryable<RecentRate> query = from r in Rates
                               where r.IsRetired == false && r.EffectiveDate <= dateNow
                               group r by r.RateTypeID into rg
                               select new RecentRate
                               {
                                 Rate = rg.OrderByDescending(r => r.EffectiveDate).FirstOrDefault()
                               };

这可能有效:

   IQueryable<Rate> query = from r in Rates
                            where r.IsRetired == false && r.EffectiveDate <= dateNow
                            group r by r.RateTypeID into rg
                            select rg.OrderByDescending(r => r.EffectiveDate).FirstOrDefault();

我认为这是VB语法

Dim result = (
    From r In Rates
    Where r.IsRetired = False And r.EffectiveDate <= dateNow
    Group r By r.RateTypeID
    Into rg = Group
    Select rg.OrderByDescending(Function(r) r.EffectiveDate).FirstOrDefault()
)