【テクニカル・上級編】【中級者・実務】VB.NETによるWPFでの画面遷移フレームワーク設計：UserControl動的切替とパラメータ受渡し – Visual Basic (VB / VB.NET)解析バイブル

Visual Basic (VB / VB.NET)

2026.11.12

WPFにおける画面遷移の極致：UserControl動的切替とメモリ管理を統べる設計パターン

WPFにおける画面遷移の極致：UserControl動的切替とメモリ管理を統べる設計パターン

業務アプリケーションの開発において、多くの開発者が陥る致命的なミスがある。それは、画面遷移のたびに新しい `Window` インスタンスを生成し、それを `Show()` することだ。

これは、リソースの浪費であるだけでなく、ユーザー体験（UX）を著しく損なう。また、画面間でのデータの受け渡しが「窓口」のない場当たり的な実装になり、結果としてメモリリークや、予期せぬ状態変化を引き起こす。

プロフェッショナルの領域では、「Single Window, Multiple Views」 という設計思想が標準である。メインウィンドウという「器（Shell）」を用意し、その中の `ContentControl` に対して `UserControl` を動的に注入していく。

本稿では、VB.NETを用いたWPF開発において、堅牢な画面遷移フレームワークをいかに設計すべきか、その極限の知見を記述する。

1. アーキテクチャの設計思想：疎結合とインターフェースの強制

画面遷移を実装する際、最も避けるべきは「ViewがViewを直接呼び出す」ことだ。これでは画面間の依存関係がスパゲッティ状態になり、保守不能なレガシーシステムへと変貌する。

我々が構築すべきは、以下の3層構造である。

1. Shell (MainWindow): 画面の土台。`ContentControl` を保持する。
2. ViewManager (NavigationService): 遷移の司令塔。どのViewを、どのパラメータと共に表示するかを管理する。
3. Views (UserControl): 個別の業務ロジックを担う部品。

ここで重要なのは、Viewにパラメータを渡すための共通インターフェースを定義することだ。

インターフェースの定義

''' <summary>
''' 全ての業務画面（UserControl）が実装すべきインターフェース。
''' 画面遷移時のパラメータ受け渡しと、リソース解放のライフサイクルを制御する。
''' </summary>
Public Interface IView
    ''' <summary>
    ''' 画面表示時に呼び出される初期化メソッド。
    ''' </summary>
    ''' <param name="parameter">遷移元から渡されるデータオブジェクト</param>
    Sub OnNavigatedTo(parameter As Object)

    ''' <summary>
    ''' 画面が破棄される直前に呼び出されるクリーンアップメソッド。
    ''' イベントハンドラの解除や、大量のメモリ消費オブジェクトの明示的解放を行う。
    ''' </summary>
    Sub OnNavigatedFrom()
End Interface

2. 実装：ViewManagerによる動的切替の実装

次に、遷移の核となる `ViewManager` を実装する。ここでは、単にコントロールを入れ替えるだけでなく、「古いViewのライフサイクルを確実に終了させる」 ことに重きを置く。

ViewManagerの実装

Public Class ViewManager
    Implements INotifyPropertyChanged

    ' メインウィンドウのContentControlにバインドされるプロパティ
    Private _currentView As Object
    Public Property CurrentView As Object
        Get
            Return _currentView
        End Get
        Set(value As Object)
            _currentView = value
            OnPropertyChanged(NameOf(CurrentView))
        End Set
    End Property

    ' 画面遷移の実行
    Public Sub NavigateTo(Of TView As UserControl)(Optional parameter As Object = Nothing) Where TView IsNot(Of Nothing)
        ' 1. 現在表示中のViewに対して、離脱処理を行う
        If TypeOf CurrentView Is IView Then
            DirectCast(CurrentView, IView).OnNavigatedFrom()
        End If

        ' 2. 新しいViewをインスタンス化
        Dim nextView As New TView()

        ' 3. 新しいViewに対して、パラメータを渡して初期化を行う
        If TypeOf nextView Is IView Then
            DirectCast(nextView, IView).OnNavigatedTo(parameter)
        End If

        ' 4. ShellのContentControlを更新
        CurrentView = nextView
    End Sub

    ' INotifyPropertyChangedの実装（省略可能だが、WPFバインディングには必須）
    Public Event PropertyChanged As PropertyChangedEventHandler Implements INotifyPropertyChanged.PropertyChanged
    Protected Sub OnPropertyChanged(propertyName As String)
        RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs(propertyName))
    End Sub
End Class

3. 実践：UserControlでのパラメータ受け渡しとメモリ管理

実際の業務画面（例：顧客マスター編集画面）での実装を見てみよう。ここで、シニアエンジニアが最も注視すべきは、「イベントハンドラの解除」 である。

WPFにおいて、ViewModelや外部サービスへのイベント購読を解除し忘れると、Viewが画面から消えてもGC（ガベージコレクション）によって回収されず、メモリリークを引き起こす。

業務画面（UserControl）の実装例

''' <summary>
''' 顧客マスター編集画面
''' </summary>
Public Class CustomerEditView
    Implements IView

    ' 外部サービス（例：データベース管理クラス）への参照
    Private _dataService As DataService

    Public Sub New()
        InitializeComponent()
    End Sub

    ''' <summary>
    ''' 画面遷移時に呼び出される。パラメータから顧客IDを取得し、データをロードする。
    ''' </summary>
    Public Sub OnNavigatedTo(parameter As Object) Implements IView.OnNavigatedTo
        ' パラメータの型安全なキャスト
        Dim customerId As Integer = 0
        If TypeOf parameter Is Integer Then
            customerId = DirectCast(parameter, Integer)
        End If

        ' データのロード
        LoadCustomerData(customerId)

        ' 外部サービスのイベントを購読（メモリリークの温床！）
        _dataService = GlobalContainer.DataService
        AddHandler _dataService.DataChanged, AddressOf OnDataChanged
    End Sub

    ''' <summary>
    ''' 画面遷移時に呼び出される。リソースを明示的に解放する。
    ''' </summary>
    Public Sub OnNavigatedFrom() Implements IView.OnNavigatedFrom
        ' 【極めて重要】イベントハンドラの解除を忘れるな
        If _dataService IsNot Nothing Then
            RemoveHandler _dataService.DataChanged, AddressOf OnDataChanged
        End If

        ' 大容量のコレクションや画像リソースがある場合は、ここでClearする
        ' gc.Collect() を呼ぶ必要はないが、参照を断つことは不可欠だ
        _dataService = Nothing
    End Sub

    Private Sub OnDataChanged(sender As Object, e As EventArgs)
        ' データ変更時の処理
    End Sub

    Private Sub LoadCustomerData(id As Integer)
        ' ロジックの実装
    End Sub
End Class

4. アーキテクトの視点：極限の最適化とトラブルシューティング

ここまでが標準的な実装だが、伝説的なアーキテクトとして、さらに踏み込んだ知見を授けよう。

メモリリークの検知とWindows API

もし、画面遷移を繰り返すとメモリ使用量が右肩上がりに増えていく場合、それは `IView.OnNavigatedFrom` での解除漏れが原因だ。
大規模なシステムでは、`VisualTreeHelper` を用いて、現在生存している `Visual` オブジェクトを走査し、期待されるViewが残っていないかをデバッグ時に検証するコードを組み込むべきだ。

また、UIスレッドのブロッキングを防ぐため、重いデータロードは必ず `Task.Run` を利用し、結果を `Dispatcher.Invoke` でUIに書き戻す必要がある。

' 非同期ロードの鉄則
Private Async Sub LoadCustomerDataAsync(id As Integer)
    ' UIスレッドをブロックせずにバックグラウンドで実行
    Dim data = Await Task.Run(Function() _dataService.FetchById(id))
    
    ' 結果をUIに反映（WPFのデータバインディングなら自動で行われることが多いが、
    ' 直接コントロールを操作する場合は Dispatcher が必須）
    Me.Dispatcher.Invoke(Sub()
                             Me.txtCustomerName.Text = data.Name
                          End Sub)
End Sub

レガシー環境との共存

もし、あなたが保守しているシステムが .NET Framework の古いバージョン（例: 4.5系）である場合、`async/await` の挙動や `Task` のオーバーヘッドに注意せよ。レガシーな COM コンポーネントと連携する場合、`Marshal.ReleaseComObject` を用いた明示的な COM オブジェクトの解放も、`OnNavigatedFrom` の責務に含まれるべきだ。

結論

モダンなWPFアプリケーションにおいて、画面遷移は単なる「表示の切り替え」ではない。それは、「オブジェクトのライフサイクルの管理」 そのものである。

1. `IView` インターフェースによるライフサイクル制御。
2. `ViewManager` による疎結合なナビゲーション。
3. `OnNavigatedFrom` における徹底したイベントハンドラの解除とリソース解放。

これらを徹底することで、メモリ消費を最小限に抑え、数日間連続稼働させても揺るがない、極めて堅牢な業務システムを構築することができる。技術の真髄は、動くものを作ることではなく、「壊れないものを作る」 ことにあるのだ。