こんにちは！現場のコードと格闘する毎日に、少しでも「ホッとする瞬間」をお届けしたいシニアエンジニアです。
皆さんは、VB.NETでの開発中、あるいはVBAからのステップアップの最中に、あの憎たらしいエラーに直面したことはありませんか？
そう、「オブジェクト参照がオブジェクト インスタンスに設定されていません」（英語：`NullReferenceException`）です。
現場の新人さんから「またこのエラーが出ました……どこが悪いんでしょう？」と泣きつきを受けることは数知れず。しかし、ここをクリアすれば、あなたのVB.NETコーディングのスキルは一段と洗練され、バグ知らずの堅牢なコードが書けるようになります。
今回は、このNullReferenceExceptionの正体を暴き、モダンなVB.NETの武器である「Null条件演算子（?.）」を使って華麗に撲滅する方法を、一緒にマスターしていきましょう！ここをクリアすれば、VB.NETの基本はバッチリですよ！
—
1. なぜ「Null（Nothing）」でプログラムはクラッシュするのか？
まず、敵を知ることから始めましょう。VB.NETの世界では、中身がからっぽの状態を `Nothing`（C#でいう `null`）と呼びます。
例えば、以下のようなダンボール箱（オブジェクト）をイメージしてください。
[変数: customer] ──> ❌ (中身が空っぽ = Nothing)
この状態で、プログラムに「このダンボールの中にある『顧客の名前』を取り出して！」と命令したとします。
Dim customer As Customer = Nothing
Dim name As String = customer.Name ‘ ←ここでクラッシュ！
プログラムは大パニックです。「空っぽの箱を開けようとしたって、中身なんてあるわけないじゃないですか！」と叫んで、アプリケーションが強制終了してしまいます。これが `NullReferenceException` の正体です。
—
2. 昔ながらの「ダサい」書き方 vs モダンの「スマート」な書き方
このエラーを防ぐため、昔のプログラミングでは、以下のように一つひとつ「中身が入っているか」をチェックするのが常識でした。
昔ながらの防御的コード（冗長で読みにくい）
Dim customer As Customer = GetCustomer()
‘ 何重にもIf文を重ねる「矢印コード（Arrow Anti-pattern）」
If customer IsNot Nothing Then
If customer.Address IsNot Nothing Then
Dim zip As String = customer.Address.ZipCode
Console.WriteLine(zip)
End If
End If
「顧客が存在するか？」を確認し、さらに「住所が存在するか？」を確認し……。これでは画面が `If` だらけになってしまい、肝心のビジネスロジックがどこにあるのか分からなくなってしまいますよね。
—
3. 救世主登場！「Null条件演算子（?.）」でコードを美しく
そこで登場するのが、VB.NET（.NET Framework 4.6以降 / .NET Core全般）で使えるNull条件演算子 `?.` です。
これを使うと、先ほどの冗長なコードが嘘のようにスッキリします。
Null条件演算子を使ったモダンなコード
‘ customerやAddressがNothingであっても、エラーにならず「Nothing」を返す
Dim zip As String = customer?.Address?.ZipCode
Console.WriteLine(zip)
🧠 ここがプロの極意：Null条件演算子の仕組み
`?.` の動きはこうです。
1. 左側のオブジェクトが `Nothing` かどうかを自動でチェックする。
2. もし `Nothing` でなければ、通常通り右側のプロパティやメソッドにアクセスする。
3. もし `Nothing` であれば、そこで評価をストップし、エラーを出さずに全体として `Nothing` を返す。
つまり、爆弾を踏む前にそっと迂回してくれるような、最高に気の利いた安全装置なんです。
—
4. 実務で即効！安全なオブジェクト操作のテクニック集
では、実際の開発現場でどのようにこの演算子を使いこなすべきか、具体的なパターンを見ていきましょう。
パターンA：メソッドの呼び出し（?.）
オブジェクトが空っぽかもしれない状態でメソッドを呼ぶ時も、`?.` が使えます。
Dim logger As Logger = Nothing
‘ loggerがNothingなので、エラーにならず、メソッド呼び出し自体がスルーされる
logger?.WriteLog(“システム起動”)
わざわざ `If logger IsNot Nothing Then` と書く必要がなくなるため、コードの可読性が劇的に向上します。
パターンB：リストや配列の要素アクセスの安全化（()?.）
データベースから取得したリストや配列を扱う際、「そもそもリスト自体が初期化されていない（Nothing）」という恐怖のケースにも対応できます。
Dim items As List(Of String) = Nothing
‘ リスト自体がNothingでも、インデックスアクセスで落ちない
Dim firstItem As String = items?(0)
パターンC：もしNothingだったら別の値を返したい！「合体演算子（If / If）とのコンボ」
Null条件演算子は「Nothing」を返しますが、実務では「Nothingの代わりに、空文字 `””` や `0` を入れておきたい」というケースがほとんどです。
そんな時は、VB.NETの `If` 演算子（二項演算子） または `If関数` と組み合わせます。
Dim customer As Customer = Nothing
‘ customer?.Name が Nothing だった場合は、右側の “ゲスト” を採用する
Dim name As String = If(customer?.Name, “ゲスト”)
Console.WriteLine(name) ‘ 出力: ゲスト
この `?.` と `If` のコンビネーションは、実務のフォーム入力値の処理やAPIレスポンスの解析において、最強のボディーガードとしてあなたを守ってくれます。
—
5. まとめ：今日からNullReferenceExceptionを怖がるな！
今回は、VB.NETにおける `NullReferenceException` の正体と、それをスマートに回避する「Null条件演算子（?.）」について解説しました。
- Nothingのオブジェクトを触ると、容赦なくプログラムはクラッシュする。
- 昔ながらの深い `If` 文のネストは、もう書かなくていい。
- `?.`（Null条件演算子）を使って、安全かつエレガントにプロパティやメソッドにアクセスする。
- `If(hoge?.prop, “デフォルト値”)` のコンボで、実務のデータ欠損に備える。
オブジェクト指向のプログラミングにおいて、「値が存在しない可能性（Nothing）」を常に意識することは、一流のエンジニアへの第一歩です。
Null条件演算子を味方につけて、バグ知らずで美しい、胸を張れるVB.NETコードを書いていきましょう！
ここをクリアしたあなたなら、もう基礎はバッチリです。自信を持って次のコードへ進んでくださいね！
