How to get rid of "If then else" ?
If qShoppingCartByCartID.Invoke(_context).Count > 0 Then
Return qShoppingCartByCartID.Invoke(_context).Select(Function(x) x.Products.UnitCost - x.Products.SalePrice).Sum
Else
Return 0
End If