http://blogs.msdn.com/dsimmons/pages/ef-faq-query.aspx
C#
static Expression<Func<TElement, bool>> BuildContainsExpression<TElement, TValue>(
Expression<Func<TElement, TValue>> valueSelector, IEnumerable<TValue> values)
{
if (null == valueSelector) { throw new ArgumentNullException("valueSelector"); }
if (null == values) { throw new ArgumentNullException("values"); }
ParameterExpression p = valueSelector.Parameters.Single();
// p => valueSelector(p) == values[0] || valueSelector(p) == ...
if (!values.Any())
{
return e => false;
}
var equals = values.Select(value => (Expression)Expression.Equal(valueSelector.Body, Expression.Constant(value, typeof(TValue))));
var body = equals.Aggregate<Expression>((accumulate, equal) => Expression.Or(accumulate, equal));
return Expression.Lambda<Func<TElement, bool>>(body, p);
}
var query2 = context.Entities.Where(
BuildContainsExpression<Entity, int>(e => e.ID, ids));
VB.NET
(ByVal valueSelector As Expressions.Expression(Of Func(Of TElement, TValue)), _
ByVal values As IEnumerable(Of TValue)) _
As Expressions.Expression(Of Func(Of TElement, Boolean))
If valueSelector Is Nothing Then
Throw New ArgumentNullException("valueSelector")
End If
If values Is Nothing Then
Throw New ArgumentNullException("values")
End If
If Not values.Any() Then
Return Function(n) False
End If
Dim equals = values.Select(Function(n) Expressions.Expression.Equal _
(valueSelector.Body, Expressions.Expression.Constant(n, GetType(TValue))))
Dim body = equals.Aggregate( _
(Function(n1, n2) Expressions.Expression.Or(n1, n2)))
Dim p As Expressions.ParameterExpression = valueSelector.Parameters.Single()
Return Expressions.Expression.Lambda(Of Func(Of TElement, Boolean))(body, p)
End Function