Dim ordersSortedByCustomerAndEuroAmount = _
  From c In customers, _
      o In c.Orders _
  Order By c.Name, o.EuroAmount Descending _
  Select c.Name, o.IdOrder, o.EuroAmount
