LINQ选择一行最多包含一列而另一列不同的列

pseudocoder 发表于 Dev

伪码

我正在使用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必须是错误的，我需要最近的一行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：如何通过SQL中的另一列选择具有MAX（Column value），DISTINCT的行？

我在vb.net中编码，但也会采用ac＃答案。谢谢！

阿杜奇

在使用Take()return的IEnumerable<T>同时FirstOrDefault()返回just <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()
)

本文收集自互联网，转载请注明来源。

如有侵权，请联系[email protected] 删除。