実行時コード生成の極限：VB.NETの `System.Reflection.Emit` でパフォーマンスの壁をブチ破る
プロフェッショナルな開発現場において、「リフレクション（Reflection）」は諸刃の剣だ。動的に型を解決し、プロパティやメソッドを操作できる柔軟性は魅力的だが、その代償として凄まじいオーバーヘッドを支払うことになる。
特に、数万件規模のデータベースレコードをエンティティオブジェクトにマッピングする処理や、高速なシリアライザの内部において、標準の `PropertyInfo.SetValue` や `Activator.CreateInstance` を愚直にループさせていないか？
もしそうなら、あなたのアプリケーションは不要なパフォーマンスのボトルネックを抱えている。
今回は、VB.NETの底力を極限まで引き出し、`System.Reflection.Emit` を用いて実行時にIL（中間言語）を直接生成・コンパイルし、静的コードと同等の実行速度を叩き出すための極意を伝授しよう。
—
1. なぜ標準リフレクションは遅いのか？
標準のリフレクションを用いたプロパティ操作の裏側では、毎回厳密なセキュリティチェック、メタデータの検索、そしてボクシング/アンボクシング（値型の場合）が発生している。これはCPUパイプラインにとって悪夢であり、特に大量データを扱う業務システムでは致命的な遅延を生む。
解決策：IL（Intermediate Language）の直接生成
`System.Reflection.Emit` を使えば、メモリ上に動的なアセンブリ、モジュール、そして型（クラス）を定義し、そのメソッドの本体（IL）を直接書き込むことができる。
一度動的メソッドや型を構築してしまえば、それ以降はネイティブなC#やVB.NETで書かれたコードと同等の速度で実行できる。リフレクションの柔軟性と、静的コードのパフォーマンスを完全に両立させる唯一の解がここにある。
—
2. 実践：高速オブジェクトファクトリの構築
ここからは、実務で即座に使えるプロダクションコードを提示する。
テーマは 「指定された型のインスタンスを、標準 `Activator.CreateInstance` の何倍もの速度で生成する動的ファクトリ」 だ。
以下のコードは、VB.NETで `DynamicMethod` を使用し、コンストラクタ呼び出しのILを直接Emitしてキャッシュする実装である。
Imports System
Imports System.Reflection
Imports System.Reflection.Emit
Imports System.Collections.Concurrent
Public NotInheritable Class FastFactory(Of T)
‘ 高速化の肝：生成デリゲートをキャッシュする
Private Shared ReadOnly _creator As Func(Of T) = InitializeCreator()
Private Sub New()
‘ インスタンス化させない
End Sub
”’
”’
Public Shared Function CreateInstance() As T
Return _creator()
End Function
”’
”’
Private Shared Function InitializeCreator() As Func(Of T)
Dim targetType As Type = GetType(T)
‘ 引数なしコンストラクタを取得
Dim ctor As ConstructorInfo = targetType.GetConstructor(Type.EmptyTypes)
If ctor Is Nothing Then
Throw New InvalidOperationException($”型 ‘{targetType.FullName}’ にはパラメータなしのコンストラクタが存在しません。”)
End If
‘ 動的メソッドの定義 (名前, 戻り値の型, 引数の型配列, モジュール)
Dim dynMethod As New DynamicMethod(
$”FastCreate_{targetType.Name}”,
targetType,
Type.EmptyTypes,
GetType(FastFactory(Of T)).Module
)
‘ ILジェネレータを取得して命令を積み上げる
Dim ilGen As ILGenerator = dynMethod.GetILGenerator()
‘ 1. インスタンスを生成してスタックにロード
ilGen.Emit(OpCodes.Newobj, ctor)
‘ 2. メソッドを抜ける（スタック上のインスタンスが戻り値となる）
ilGen.Emit(OpCodes.Ret)
‘ デリゲートとしてコンパイルして返す
Return DirectCast(dynMethod.CreateDelegate(GetType(Func(Of T))), Func(Of T))
End Function
End Class
このコードの優れている点
1. JITコンパイルの恩恵を最大化: `DynamicMethod` と `CreateDelegate` を組み合わせることで、ランタイムが生成されたILをネイティブコードにコンパイルし、直接呼び出しが可能になる。
2. 圧倒的な速度: `Activator.CreateInstance` や `ConstructorInfo.Invoke` と比較して、数倍から十倍以上のスループットを発揮する。
3. 完全な型安全性: ジェネリッククラス（`FastFactory(Of T)`）として設計されているため、呼び出し側でキャストの手間がなく、コンパイル時チェックが効く。
—
3. データベース・ファイル連携における実践応用：高速マッパー
業務システムにおいて、ADO.NETの `IDataReader` やCSVファイルから読み込んだデータを、強型付けのエンティティクラスにマッピングする処理は最も負荷がかかる箇所の一つだ。
ここに Emit によるプロパティ設定処理を適用することで、ORM（Object-Relational Mapper）の内部処理のような爆速マッピングを実現できる。
Public Class EmitMapper(Of T)
‘ プロパティ設定処理を行うデリゲートのキャッシュ
Private Shared ReadOnly _setters As Dictionary(Of String, Action(Of T, Object)) = InitializeSetters()
Private Shared Function InitializeSetters() As Dictionary(Of String, Action(Of T, Object))
Dim dict As New Dictionary(Of String, Action(Of T, Object))(StringComparer.OrdinalIgnoreCase)
Dim targetType As Type = GetType(T)
For Each prop As PropertyInfo In targetType.GetProperties(BindingFlags.Public Or BindingFlags.Instance)
If prop.CanWrite AndAlso prop.GetSetMethod(True) IsNot Nothing Then
dict(prop.Name) = CreateSetter(prop)
End If
Next
Return dict
End Function
”’
”’
Private Shared Function CreateSetter(prop As PropertyInfo) As Action(Of T, Object)
Dim targetType As Type = GetType(T)
ubSetMethod As MethodInfo = prop.GetSetMethod(True)
Dim paramType As Type = prop.PropertyType
‘ DynamicMethod: 引数は (T instance, Object value)
Dim dynMethod As New DynamicMethod(
$”FastSet_{targetType.Name}_{prop.Name}”,
GetType(Void),
New Type() {targetType, GetType(Object)},
GetType(EmitMapper(Of T)).Module
)
Dim ilGen As ILGenerator = dynMethod.GetILGenerator()
‘ 1. インスタンスをスタックにロード (Arg.0)
ilGen.Emit(OpCodes.Ldarg_0)
‘ 2. 設定する値（Object型）をスタックにロード (Arg.1)
ilGen.Emit(OpCodes.Ldarg_1)
‘ 3. 値型の場合、ボクシングされているためアンボクシング（またはキャスト）が必要
If paramType.IsValueType Then
ilGen.Emit(OpCodes.Unbox_Any, paramType)
Else
ilGen.Emit(OpCodes.Castclass, paramType)
End If
‘ 4. プロパティのセッターメソッドを呼び出す
ilGen.Emit(OpCodes.Callvirt, subSetMethod)
‘ 5. 終了
ilGen.Emit(OpCodes.Ret)
Return DirectCast(dynMethod.CreateDelegate(GetType(Action(Of T, Object))), Action(Of T, Object))
End Function
”’
”’
Public Shared Sub SetValue(instance As T, propertyName As String, value As Object)
Dim setter As Action(Of T, Object) = Nothing
If _setters.TryGetValue(propertyName, setter) Then
setter(instance, value)
End If
End Sub
End Class
—
4. プロフェッショナルとしての設計上の注意点と罠
`System.Reflection.Emit` は強力だが、一歩間違えるとシステム全体を不安定にする諸刃の剣である。現場でこれを導入する際は、以下の鉄則を厳守してほしい。
1. 動的メソッドの乱造によるメモリリーク（AppDomainの肥大化）に注意
- 動的メソッド（`DynamicMethod`）は、対応するデリゲートがガベージコレクション（GC）されるまではメモリ上に残り続ける。
- しかし、同じIL構造のメソッドを何回も動的に生成し直すと、JITコンパイルのキャッシュが溢れ、メモリリークやパフォーマンス低下を引き起こす。必ず今回紹介したように、デリゲートや生成ロジックを `Shared`（静的）フィールドやキャッシュ機構で一度きりの生成に留めること。
2. デバッグの難易度
- ILレベルでバグがある場合（スタックの不整合など）、例外は実行時に `InvalidProgramException` として突然発生する。
- 開発時はまず通常のC# / VB.NETコードでロジックを固め、どうしても許容できないボトルネック箇所だけに Emit をピンポイントで適用するのが鉄則だ。
3. セキュリティ（ReflectionPermission）
- 近年の .NET Core / .NET 5+ 環境では、通常の動的メソッドは安全に実行できるが、プライベートメンバーへのアクセス時はカプセル化の原則やセキュリティコンテキストに留意すること。
—
総括
VB.NETは「古い言語」などではない。.NETの基盤であるCLR（Common Language Runtime）を直に叩くこのような高度なメタプログラミングにおいて、VB.NETはその簡潔な構文と強力なコンパイラバックエンドにより、極めて高いパフォーマンスを発揮する。
「標準機能では遅いから諦める」ではなく、「ボトルネックを特定し、Emitで自ら高速化の仕組みをハックする」――これこそが、周囲のエンジニアを圧倒し、真に堅牢でスケーラブルな業務システムを構築するシニア・アーキテクトの姿勢である。
現場のパフォーマンス限界を突破したい場面に、ぜひこの知見を役立ててほしい。
