所以这是错误的行：
@For Each item In futureClasses.OrderBy(
Function(c) c.ClassDates.OrderBy(
Function(d) d.Value).ToList).ToList
类结构的相关部分是：
Public Class [Class]
Public Property ClassDates As List(Of ClassDate) = New List(Of ClassDate)
End Class
Public Class ClassDate
Implements IComparable(Of ClassDate)
Public Property Value As Date
Public Function CompareTo(other As ClassDate) As Integer Implements IComparable(Of ClassDate).CompareTo
Return Me.Value < other.Value
End Function
End Class
想法是构造一个[Class]对象列表（以进行迭代），以便使对象在时间流中首先出现。
我得到的错误是：
至少一个对象必须实现IComparable。
我已经在那条线上设置了一个断点。发生错误时，futureClasses包含2个[Class]元素，每个元素带有一个ClassDate。
值是：
futureClasses(0).ClassDates(0).Value = #3/13/2014#
futureClasses(1).ClassDates(0).Value = #4/17/2014#
有人知道为什么会这样或被扔吗？
我认为您正在寻找的是这样的：
futureClasses.OrderBy(Function(c) c.ClassDates.OrderBy(Function(d) d.Value).First().Value).ToList
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
我来说两句