こんにちは！開発現場の第一線で戦うエンジニアの皆さん、そして「そろそろマクロの自動記録や基本の構文から一歩抜け出して、本物のアーキテクチャを理解したい！」と熱くなっている皆さん。
今回は、VB.NETの中上級者が必ずぶつかる壁であり、ここを突破できれば「おっ、こいつはできるな」と周囲を唸らせることができるテーマを用意しました。
それが「`Expression(Of TDelegate)`を用いた動的クエリ構築：実行時の条件変化に柔軟に対応するLINQ式ツリーの生成と最適化」です。
なんだか呪文のような名前が並んでいますが、安心してください。優しく、かつ現場のリアルな泥臭さと美しさを交えて、本質を徹底的に解説していきます。ここをクリアすれば、VB.NETの表現力は一気に数段跳ね上がりますよ。
—
1. なぜ「動的な検索条件」で私たちは悩むのか？
業務システムの開発で、よくこんな要件に出会いませんか？
> 「ユーザーが画面で『氏名』『年齢』『登録日』など、どの項目に条件を入れるか分からない。入力された項目だけでデータベースを絞り込んでほしい」
初学者の頃は、ついこんなコードを書きがちです。
.net
‘ 【やってはいけないアンチパターン例】文字列連結によるSQL/LINQ構築
Dim query = db.Users.AsQueryable()
If Not String.IsNullOrEmpty(txtName.Text) Then
query = query.Where(Function(x) x.Name.Contains(txtName.Text))
End If
If Not String.IsNullOrEmpty(txtAge.Text) Then
Dim age As Integer = CInt(txtAge.Text)
query = query.Where(Function(x) x.Age = age)
End If
「あれ？これでも動くじゃん」と思いましたか？
実はこれ、メモリ上で全件フェッチしてからフィルタリングしてしまったり、Entity FrameworkなどのORMを使う場面においてパフォーマンス上の爆弾を抱えることになります。さらに、複雑なOR条件や「Aかつ(BまたはC)」といった動的な組み合わせを表現しようとすると、この`If`のネスト地獄でコードは完全に崩壊します。
ここで登場するのが、今回マスターする `Expression(Of T)`（式ツリー） です。
—
2. Expression(Of T) とは何か？（ラムダ式との決定的な違い）
通常のラムダ式（例: `Function(x) x.Age > 20`）は、コンパイルされてメモリ上の「実行可能なコード（デリゲート）」になります。
一方、`Expression(Of Func(Of User, Boolean))` のようにラップすると、VB.NETのコンパイラはそれを「コードのデータ構造（抽象構文木：AST）」に変換します。
つまり、「コードをその場で組み立てるための設計図（データ）」として扱えるようになるのです。
これにより、以下のような魔法が可能になります。
1. 実行時（ユーザーが画面をポチポチ押した瞬間）に条件をパーツ単位で作成する。
2. それらを `AndAlso` や `OrElse` で自由自在に結合する。
3. 最終的な巨大な「式ツリー」をデータベース（SQL Serverなど）に送り、データベース側で最適なSQLに翻訳して実行させる。
SQLインジェクションのリスクはゼロになり、パフォーマンスも極限まで最適化されます。
—
3. 実践：動的式ツリー構築のコードリーディング
それでは、実際に現場で使える堅牢なコードを見てみましょう。
今回は、ユーザーエンティティに対して、名前と年齢の条件を動的に組み合わせて絞り込む仕組みを実装します。
.net
Imports System.Linq.Expressions
Public Class DynamicQueryService
‘ 検索条件を保持するDTO（データ転送オブジェクト）
Public Class SearchCriteria
Public Property NameKeyword As String
Public Property MinAge As Integer?
End Class
‘ ユーザーエンティティ
Public Class User
Public Property Name As String
Public Property Age As Integer
End Class
”’
”’
Public Function BuildDynamicExpression(criteria As SearchCriteria) As Expression(Of Func(Of User, Boolean))
‘ 1. パラメータの定義 (Function(x) の “x” に相当)
Dim paramExpr As ParameterExpression = Expression.Parameter(GetType(User), “x”)
‘ 2. 初期値として「True」の式を用意 (AND条件で結合していくため)
Dim combinedExpr As Expression = Expression.Constant(True)
Dim hasCondition As Boolean = False
‘ — 条件A: 氏名が指定されている場合 —
If Not String.IsNullOrWhiteSpace(criteria.NameKeyword) Then
‘ プロパティアクセス: x.Name
Dim propertyExpr = Expression.Property(paramExpr, NameOf(User.Name))
‘ メソッド呼び出しの引数: criteria.NameKeyword
Dim constantExpr = Expression.Constant(criteria.NameKeyword)
‘ String.Contains メソッドのInfoを取得
‘ ※VB.NETではGetType(String).GetMethod(…)で特定のメソッドを指定できます
val methodInfo = GetType(String).GetMethod(“Contains”, New Type() {GetType(String)})
‘ x.Name.Contains(criteria.NameKeyword) を構築
Dim containsExpr = Expression.Call(propertyExpr, methodInfo, constantExpr)
‘ 条件を結合
combinedExpr = containsExpr
hasCondition = True
End If
‘ — 条件B: 最低年齢が指定されている場合 —
If criteria.MinAge.HasValue Then
‘ プロパティアクセス: x.Age
Dim propertyExpr = Expression.Property(paramExpr, NameOf(User.Age))
‘ 定数: criteria.MinAge.Value
Dim constantExpr = Expression.Constant(criteria.MinAge.Value, GetType(Integer))
‘ x.Age >= criteria.MinAge を構築
Dim greaterThanOrEqualExpr = Expression.GreaterThanOrEqual(propertyExpr, constantExpr)
If hasCondition Then
‘ 既に前の条件があれば AndAlso で結ぶ
combinedExpr = Expression.AndAlso(combinedExpr, greaterThanOrEqualExpr)
Else
combinedExpr = greaterThanOrEqualExpr
hasCondition = True
End If
End If
‘ 条件が一切ない場合は常にTrueを返す式にする
If Not hasCondition Then
Return Function(x) True
End If
‘ 3. 最終的な式ツリーをラムダ式（Expression
Return Expression.Lambda(Of Func(Of User, Boolean))(combinedExpr, paramExpr)
End Function
End Class
コードの解説：ここがエンジニアの腕の見せ所
1. `Expression.Parameter`
ラムダ式の引数（`Function(x)` の `x`）に該当する部分を明示的に定義しています。ここからツリーの枝葉が伸びていきます。
2. `Expression.Property` と `Expression.Call`
リフレクションの要領で、型のプロパティやメソッド（`Contains`など）を安全に呼び出す式を組み立てています。これにより、タイポによるバグをコンパイル時やテスト時に確実に検知できます。
3. `Expression.AndAlso`
短絡評価（ショート・サーキット）を行う `AndAlso` を式ツリーレベルで構築しています。これにより、無駄な評価を防ぎ、SQLに変換された際も効率的な `AND` 演算子に翻訳されます。
—
4. 現場で陥りやすい罠とエラー対策
この動的式ツリーを扱う際、開発者がよくハマる「痛い罠」がいくつかあります。プロフェッショナルとして、これらを事前に回避しましょう。
罠1: クロージャ（外部変数のキャプチャ）による型不一致
式ツリーの中で、メソッド内のローカル変数をそのまま参照しようとすると、Entity Frameworkが「データベース側でSQLに翻訳できない」という旨の例外（NotSupportedException）を吐くことがあります。
対策: 式ツリー内で使う値は、必ず `Expression.Constant()` を使って明示的に定数として式に埋め込むか、あらかじめローカル変数に値として確定させてから渡すようにしてください。
罠2: Null許容型（Nullable(Of T)）の比較エラー
データベースの数値型や日付型が `Null` を許容する場合、そのまま比較式を作るとNullReferenceExceptionやSQL翻訳エラーが発生します。
対策: `Nullable(Of T)` の `.Value` プロパティや `.HasValue` プロパティを正しく式ツリーに組み込むか、あらかじめ条件分岐で弾くガード節を設けてください。
—
まとめ：VB.NETの底力を引き出せ
今回は、`Expression(Of TDelegate)` を用いた高度な動的クエリ構築について解説しました。
一見するとコード量が増えて難解に見えるかもしれません。しかし、このテクニックをモノにすれば、どんなに複雑怪奇な検索条件を持つ巨大なエンタープライズシステムであっても、「安全で、高速で、美しく拡張性の高い」コードを書くことができるようになります。
「マクロの記録」や「コピペプログラミング」のステージはもう卒業です。VB.NETという言語が持つ裏の顔、すなわち強力な.NETのメタプログラミング能力を使いこなし、ワンランク上のアーキテクトへ駆け上がりましょう。
あなたのエンジニアライフが、よりエキサイティングで実りあるものになりますように。それではまた、次の現場でお会いしましょう！
