こんにちは！チームのコードレビューをしていて、「おっ、この書き方はスマートですね！」と後輩から声をかけられる瞬間って、エンジニアとして最高に嬉しいですよね。
マクロの記録や、単純なループ処理から一歩抜け出して、「プロフェッショナルなVB.NETプログラマー」を目指すあなたへ。今回は、大規模データを扱う現場で必ず武器になる『Yieldキーワードを用いたイテレータ（遅延評価）の実装』について、魂を込めて解説します。
ここをクリアすれば、メモリ不足エラー（Out of Memory）に怯える日々とはおさらばできますよ。それでは、優しく知的なエンジニアの世界へご案内します！
—
1. なぜ「一括処理」は業務システムで嫌われるのか？
皆さんは、数万件、あるいは数百万件の巨大なCSVファイルやデータベースのレコードを処理した経験はありますか？
きっと、こんなコードを書いたことがあるはずです。
.net
‘ 【アンチパターン】全データを一度にメモリへ読み込む処理
Dim allRecords As List(Of CustomerData) = Database.GetHugeCustomerList()
For Each customer In allRecords
‘ 1件ずつ処理するが、すでにメモリには全件展開されている
ProcessCustomer(customer)
Next
このコード、データが100万件あったらどうなるでしょうか？ .NETのメモリ上に100万個のオブジェクトが一気に生成され、ガベージコレクタ（GC）が悲鳴を上げ、最悪の場合はアプリケーションがクラッシュします。
これを救うのが、今回学ぶ「遅延評価（Deferred Execution）」と`Yield`です。
—
2. Yieldキーワードとは何か？（図解的アプローチ）
`Yield` は、一言で言うと「必要な時に、必要な分だけデータを生み出す（イールドする）工場」です。
従来のリスト（List等）が「スーパーの棚に全商品をあらかじめ並べておく」スタイルだとしたら、`Yield`を使ったイテレータは「お客さんが注文ボタンを押してから、目の前で1品ずつ寿司を握って出す」職人スタイルです。
[従来のリスト]
全データ生成 ──> メモリに全保持 ──> ループ処理 (メモリ圧迫！)
[Yieldイテレータ]
要求 ──> 1件生成(Yield) ──> 処理 ──> 次の要求 ──> 1件生成(Yield)… (メモリ極小！)
VB.NETでは、`Iterator` 関数と `Yield` を組み合わせることで、この「職人スタイル」のカスタム列挙を驚くほど簡単に実装できます。
—
3. 実践！Yieldを使った遅延評価イテレータの実装
それでは、実際に巨大なログファイルを1行ずつ読み込んで処理する、実務さながらのコードを見てみましょう。
.net
Imports System.IO
Imports System.Collections.Generic
Public Class LogAnalyzer
‘ 巨大なファイルをメモリに全展開せず、1行ずつ遅延評価で返すメソッド
Public Iterator Function ReadLargeLogFile(filePath As String) As IEnumerable(Of String)
‘ ファイルストリームを開く
Using reader As New StreamReader(filePath)
While Not reader.EndOfStream
Dim line As String = reader.ReadLine()
‘ 条件に合う行だけをフィルタリングして「返す（Yield）」
If Not String.IsNullOrWhiteSpace(line) AndAlso line.Contains(“ERROR”) Then
‘ ここで一旦呼び出し元に制御を渡し、値（行）を返す
Yield line
End If
‘ 呼び出し元が次のループに進むと、ここから処理が再開される
End While
End Using
‘ ファイルは自動的に閉じてクリーンアップされる
End Function
End Class
このコードの美しいポイント
1. `Iterator Function` の宣言: 返り値の型が `IEnumerable(Of String)` または `IEnumerator(Of String)` である必要があります。
2. `Yield line`: 全行を `List` に溜め込まず、エラー行が見つかった瞬間に呼び出し元へパスします。
3. リソースの安全性: `Using` ブロックと組み合わせることで、イテレーションの途中で処理が中断されても、ファイルストリームが確実に解放されます。
—
4. 呼び出し側のコード：驚くほどシンプル
このメソッドを使う側は、通常の `For Each` ループを書くだけです。内部で何が起きているか（遅延評価されていること）を意識せず、綺麗に記述できます。
.net
Sub Main()
Dim analyzer As New LogAnalyzer()
‘ この時点ではファイルは読み込まれていません！
Dim errorLogs = analyzer.ReadLargeLogFile(“C:\Logs\Server_2023.log”)
Console.WriteLine(“ログ処理を開始します…”)
‘ For Each が回るたびに、1行ずつファイルから読み込まれて処理されます
For Each logLine As String In errorLogs
Console.WriteLine($”検知: {logLine}”)
‘ 業務ロジック（例：最初の10件で見打ちにする場合もメモリ効率が良い）
Next
End Sub
—
5. 陥りやすい罠とプロフェッショナルの注意点
Yieldは非常に強力ですが、上級者だからこそハマる「罠」がいくつかあります。ここを押さえておけば完璧です。
罠①: `Try-Catch-Finally` と `Yield` の制約
VB.NETでは、`Yield` ステートメントを `Try…Catch…End Try` の `Catch` ブロック内に置くことはできません。また、`Try…Finally` の中に置く場合も注意が必要です。
対策: 例外処理は `Yield` を呼び出す側のループで行うか、イテレータ関数の外側（`Using` や `Try` の中）でストリームを開く設計にしましょう。
罠②: 評価の遅延による「変数のスコープ・タイミング」の罠
遅延評価（Deferred Execution）の性質上、クエリが定義された時点ではなく、`For Each` で評価が実際に走った時点で変数の値評価が行われます。ループ変数のキャプチャミスなどに注意してください。
罠③: 二重列挙（Multiple Enumeration）
`IEnumerable` を返すイテレータは、`For Each` を回すたびに毎回最初から処理が実行され直します。もし重いDBアクセスやファイル読み込みを伴うイテレータであれば、何度もループを回すとパフォーマンスが激減します。
対策: 1度だけ結果を固定したい場合は、`.ToList()` や `.ToArray()` で一度だけメモリに実体化（Materialize）させましょう。
—
お疲れ様でした！今回は `Yield` キーワードを用いたイテレータの実装と、大規模データ処理の極意について解説しました。
ここをクリアすれば、単に動くコードを書くだけでなく、「リソースを溺愛し、パフォーマンスに責任を持つシニアエンジニア」としての視座が手に入ります。
日々のコーディングにぜひ取り入れて、ワンランク上のVB.NETプログラミングを楽しんでくださいね！それでは、次回の記事もお楽しみに。
