【実務・中級編】実務中級者向け：VB.NETのOptionalキーワードとパラメータ配列(ParamArray)：可変長引数を安全に活用するメソッド設計の極意 – Visual Basic (VB / VB.NET)解析バイブル

【VB.NET極限の知見】OptionalとParamArrayを制する者が、保守性の高いメソッド設計を制す

開発現場でこんなコードを見たことはないだろうか。

‘ メンテナンス地獄の幕開けとなるアンチパターン
Public Sub SaveData(ByVal data As String, ByVal Optional mode As Integer = 0, ByVal Optional path As String = “”, ByVal Optional backup As Boolean = False, ByVal Optional timeout As Integer = 30)
‘ 処理がここに延々と続く…
End Sub

業務自動化ツールや社内ニッチシステムの開発において、メソッドの引数設計はアプリケーションの寿命を左右する極めて重要なファクターだ。仕様変更のたびに引数が増殖し、呼び出し側では何がなんだか分からない「`True, 0, “”, False`」といったマジックリテラルが並ぶ。

今回は、VB.NET中級者から一歩抜け出し、「堅牢で拡張性の高い設計」を手に入れるための`Optional`キーワードと`ParamArray`（パラメータ配列）の極意を伝授する。

—

1. なぜ「Optional」の多用は危険なのか？（裏側で起きていること）

`Optional`キーワードは、引数を省略可能にする便利な機能だ。しかし、これを安易に使い捨てると、「バージョニングの呪い」に直面する。

時代の変化とCOM Interopの呪縛

そもそも、VB.NETの`Optional`は、VB6時代からの歴史的背景（COMコンポーネントとの互換性）を強く引きずっている。
裏側で何が起きているかというと、コンパイラは省略された引数に対して自動的にデフォルト値を補うコードを生成している。一見するとスマートだが、ここには深刻な罠がある。

1. ABI（アプリケーションバイナリインターフェイス）の破壊:
DLLとして提供しているライブラリ側で、`Optional`引数のデフォルト値を変更した場合、それを呼び出している実行ファイル（EXE）側を再コンパイルしないと、古いデフォルト値が強制適用されるという致命的な不具合を生む。
2. オーバーロードとの見えない戦い:
`Optional`とメソッドのオーバーロード（Overloads）を混在させると、コンパイラの解決優先順位で意図しないオーバーロードが選択されるバグ（いわゆる解決の曖昧さ）の温床になる。

【極意】Optionalを使うべき境界線

`Optional`を使ってよいのは、「ログ出力の冗長度」や「タイムアウトのデフォルト値」など、システム全体で普遍的かつ変更されない補助的なパラメータに限るべきだ。ビジネスロジックのコアにおいて、振る舞いを大きく変えるフラグを`Optional`で量産するのは今すぐやめよう。

—

2. 任意の引数を安全に飲み込む「ParamArray」の真価

一方で、データベースへの一括登録や、複数のファイルパスを動的に処理するファイル連携バッチでは、「いくつ引数が来るか分からない」状況が頻発する。ここで登場するのが`ParamArray`だ。

`ParamArray`を使用すると、型安全を担保しながら可変長の引数を受け取ることができる。

ParamArrayの鉄則

• 引数リストの一番最後にしか配置できない。
• 配列型（例: `ByVal ParamArray files() As String`）として内部で処理される。
• 呼び出し側は、配列を明示的にインスタンス化しなくても、カンマ区切りで直感的に値を渡せる。

—

3. 【実践】ファイル・DB連携における堅牢なプロダクションコード

百聞は一見に如かず。ここでは、実務で即座に使える、`ParamArray`と構造体を組み合わせた「ファイル一括処理＆トランザクションログ記録」の堅牢な実装パターンを示す。

このコードは、可変長のファイルパスを受け取り、それぞれの存在チェックとDBへのログ記録を安全に行うものだ。

Imports System.IO
Imports System.Data.SqlClient

Public Class DataProcessor

‘ 処理結果を格納する構造体（設計の美しさを担保）
Public Structure ProcessResult
Public TargetPath As String
Public IsSuccess As Boolean
Public ErrorMessage As String
End Structure

”’

”’ データベース接続文字列 ”’ 処理対象のファイルパス（可変長） Public Function ProcessFiles(ByVal connectionString As String, ByVal ParamArray filePaths() As String) As List(Of ProcessResult)

Dim results As New List(Of ProcessResult)()

‘ 防御的プログラミング：そもそも引数が空の場合のガード
If filePaths Is Nothing OrElse filePaths.Length = 0 Then
Console.WriteLine(“[WARN] 処理対象のファイルが指定されていません。”)
Return results
End If

‘ データベース接続はUsingブロックで確実に解放する（リソースリークの断絶）
Using connection As New SqlConnection(connectionString)
connection.Open()

For Each filePath As String In filePaths
Dim res As ProcessResult
res.TargetPath = filePath
res.IsSuccess = True
res.ErrorMessage = String.Empty

Try
‘ 1. ファイル存在確認
If Not File.Exists(filePath) Then
Throw New FileNotFoundException($”指定されたファイルが見つかりません: {filePath}”)
End If

‘ 2. ここに実際のファイル読み込み・データ処理ロジックが入る
‘ Dim content = File.ReadAllText(filePath)

‘ 3. データベースへ処理成功ログを記録
WriteAuditLog(connection, filePath, “SUCCESS”, “正常終了”)

Catch ex As Exception
‘ 異常系：エラーを捕捉し、結果リストに格納（バッチ全体を止めない設計）
res.IsSuccess = False
res.ErrorMessage = ex.Message

‘ データベースへエラーログを記録
WriteAuditLog(connection, filePath, “ERROR”, ex.Message)
End Try

results.Add(res)
Next
End Using

Return results
End Function

”’

Private Sub WriteAuditLog(ByVal connection As SqlConnection, ByVal target As String, ByVal status As String, ByVal message As String)
Dim query As String = “INSERT INTO AuditLogs (Target, Status, Message, ExecutedAt) VALUES (@Target, @Status, @Message, @GetDate)”

Using command As New SqlCommand(query, connection)
command.Parameters.AddWithValue(“@Target”, target)
command.Parameters.AddWithValue(“@Status”, status)
command.Parameters.AddWithValue(“@Message”, message)
command.ExecuteNonQuery()
End Using
End Sub

End Class

このコードのアーキテクチャ的解説

1. `ParamArray filePaths() As String` の採用:
呼び出し側は `processor.ProcessFiles(connStr, “C:\file1.txt”, “D:\file2.txt”, “E:\file3.txt”)` のように、配列の生成を意識することなく直感的に記述できる。
2. バッチ処理における「部分成功（Fail-Safe）」の思想:
ループ内で例外が発生しても、単一ファイルの失敗としてキャッチし、他のファイルの処理を継続した上で、結果をリストで返却している。可用性が求められる業務自動化ツールでは必須のパターンだ。
3. リソース管理の徹底:
`SqlConnection` や `SqlCommand` はすべて `Using` ブロックで囲み、ガベージコレクション（GC）の負担やコネクションリークを完全に排除している。

—

4. チーフアーキテクトからの提言：可読性と保守性のバランス

`Optional`も`ParamArray`も、使い方を誤れば「読むだけで頭痛がするスパゲッティコード」を生み出す諸刃の剣だ。

• 引数が3つ以上になりそう、または将来的に拡張の予感がある場合:

`Optional`で逃げるのではなく、「オプションパラメータ用クラス（Parameter Objectパターン）」を定義せよ。

‘ パラメータオブジェクトの例（圧倒的にメンテナンスしやすい）
Public Class ProcessOptions
Public Property TimeoutSeconds As Integer = 30
Public Property CreateBackup As Boolean = False
Public Property OverrideMode As Integer = 0
End Class

オブジェクト指向の原則に立ち返り、メソッドのシグネチャをスッキリと保つこと。それが、日々の保守作業に追われる開発者地獄から抜け出す唯一にして最大の近道である。

VB.NETの言語仕様の奥底を理解し、現場のエンジニアが「おっ」と唸るような、美しく堅牢なコードベースを築き上げてほしい。