java icomparer_必须为接口 System.Collections.IComparer 实现

C# codes:

public class DateComparer : IComparer

{

public int Compare(object x, object y)

{

if ((x as RadDate).Date < (y as RadDate).Date)

{

return -1;

}

else if ((x as RadDate).Date > (y as RadDate).Date)

{

return 1;

}

else

{

return 0;

}

}

}

Converted to VB codes:

Public Class DateComparer

Implements IComparer

Public Function Compare(ByVal x As Object, ByVal y As Object) As Integer Implements System.Collections.IComparer.Compare           If (TryCast(x, Telerik.Web.UI.RadDate)).Date < (TryCast(y, Telerik.Web.UI.RadDate)).Date Then

Return -1

ElseIf (TryCast(x, Telerik.Web.UI.RadDate)).Date > (TryCast(y, Telerik.Web.UI.RadDate)).Date Then

Return 1

Else

Return 0

End If

End Function

End Class