For a non-LINQ solution:

theList.Sort(  (x, y) => { int result = x.Popular.CompareTo(y.Popular);   if (result == 0) {   result = x.Clicked.CompareTo(y.Clicked);   if (result == 0) { result = x.Name.CompareTo(y.Name); }   }   return result;   } ); 

To answer your question about a lambda expression, that is too complex to put in a lambda expression, as VB doesn't support multi-line lambda expressions.

For a non-LINQ solution:

You need a named method as a comparer:

Private Function Comparer(ByVal x As Product, ByVal y As Product) As Integer Dim result As Integer = x.Popular.CompareTo(y.Popular) If result = 0 Then result = x.Clicked.CompareTo(y.Clicked) If result = 0 Then result = x.Name.CompareTo(y.Name) End If End If Return result End Function 

Usage:

theList.Sort(AddressOf Comparer)