【VB.NET極限知見】再起動なしで実現する！ResXを用いた動的ローカライズとUIメモリ最適化のアーキテクチャ
グローバル展開する製造業や商社向けの業務アプリケーションにおいて、多言語対応（国際化・ローカライズ）は避けて通れない要件だ。
しかし、標準的な `.NET` の `ComponentResourceManager` を用いたアプローチをそのまま適用すると、致命的な罠に陥る。アプリケーションを再起動させずに言語を動的切り替えしようとした際、コントロールの再生成コストによるUIスレッドのブロック、メモリリーク、そして古い言語リソースがヒープに残存する現象に直面したエンジニアも多いはずだ。
本稿では、VB.NETのWindows Forms環境下において、レガシーなWin32 APIの知見とガベージコレクション（GC）のライフサイクルを制御しながら、「高速かつ省メモリで動作する動的言語切り替えメカニズム」の極限実装を解説する。
—
1. 従来のローカライズ実装が抱える構造的欠陥
標準的な `ApplyResources` メソッドを用いた動的切り替えには、以下の致命的なトレードオフが存在する。
1. コントロールの再再描画（Invalidate / SuspendLayoutの欠如）によるフリーズ
2. 静的リソースアセンブリのロックとメモリ肥大化
3. MDI子画面や動的生成されたユーザードローコントロールへの伝播漏れ
これらを解決するためには、フォームの階層構造を再帰的に走査し、`ComponentResourceManager` を明示的に適用しつつ、Win32 APIを用いた描画の抑制（`WM_SETREDRAW`）を行う必要がある。
—
2. 実装：高速動的ローカライズ・エンジン
以下に、再起動なしでフォーム全体のテキストを一括書き換えるための基盤クラスの実装を示す。Win32 APIを駆使して描画を一時停止させ、ちらつき（Flicker）とパフォーマンス劣化を極限まで排除している。
Imports System.ComponentModel
Imports System.Globalization
Imports System.Reflection
Imports System.Runtime.InteropServices
”’
”’
Public NotInheritable Class DynamicLocalizationEngine
Private Sub New()
‘ 静的クラス
End Sub
‘ — Win32 API 定義 (描画抑止によるパフォーマンス劇的改善) —
Private Shared Function SendMessage(hWnd As IntPtr, wMsg As UInteger, wParam As IntPtr, lParam As IntPtr) As IntPtr
End Function
Private Const WM_SETREDRAW As UInteger = &HB
”’
”’
”’ 対象のFormインスタンス
”’ 適用するCultureInfo
Public Shared Sub SwitchLanguage(targetForm As Form, culture As CultureInfo)
If targetForm Is Nothing Then Return
‘ 1. スレッドのカルチャを変更 (日時や数値フォーマットのため)
System.Threading.Thread.CurrentThread.CurrentCulture = culture
System.Threading.Thread.CurrentThread.CurrentUICulture = culture
Dim handle As IntPtr = targetForm.Handle ‘ ハンドルの強制生成
Try
‘ 2. 描画のロック (Win32 APIによる点滅防止と高速化)
SendMessage(handle, WM_SETREDRAW, IntPtr.Zero, IntPtr.Zero)
targetForm.SuspendLayout()
‘ 3. リソースマネージャーの生成 (フォームの型に紐づくResXをターゲット)
Dim rm As New ComponentResourceManager(targetForm.GetType())
‘ 4. フォーム自体の適用
rm.ApplyResources(targetForm, “$this”, culture)
‘ 5. 子コントロールの再帰的走査と適用
For Each ctrl As Control In targetForm.Controls
ApplyResourcesRecursive(rm, ctrl, culture)
Next
‘ 6. メニューストリップ等のコンポーネント群の走査
If targetForm.MainMenuStrip IsNot Nothing Then
ApplyMenuResources(rm, targetForm.MainMenuStrip.Items, culture)
End If
Finally
‘ 7. レイアウト再開と描画ロック解除
targetForm.ResumeLayout(True)
SendMessage(handle, WM_SETREDRAW, New IntPtr(1), IntPtr.Zero)
targetForm.Invalidate(True) ‘ 強制再描画
End Try
End Sub
”’
”’
Private Shared Sub ApplyResourcesRecursive(rm As ComponentResourceManager, ctrl As Control, culture As CultureInfo)
If ctrl Is Nothing Then Return
‘ コントロール自体のリソース適用
rm.ApplyResources(ctrl, ctrl.Name, culture)
‘ DataGridView特殊処理 (列ヘッダー等のローカライズ)
If TypeOf ctrl Is DataGridView Then
Dim dgv = DirectCast(ctrl, DataGridView)
For Each col As DataGridViewColumn In dgv.Columns
rm.ApplyResources(col, $”{ctrl.Name}.{col.Name}”, culture)
Next
End If
‘ 子コントロールの走査
For Each child As Control In ctrl.Controls
ApplyResourcesRecursive(rm, child, culture)
Next
End Sub
”’
”’
Private Shared Sub ApplyMenuResources(rm As ComponentResourceManager, items As ToolStripItemCollection, culture As CultureInfo)
For Each item As ToolStripItem In items
rm.ApplyResources(item, item.Name, culture)
If TypeOf item Is ToolStripMenuItem Then
Dim menuItem = DirectCast(item, ToolStripMenuItem)
If menuItem.DropDownItems.Count > 0 Then
ApplyMenuResources(rm, menuItem.DropDownItems, culture)
End If
End If
Next
End Sub
End Class
—
3. メモリ最適化とガベージコレクション（GC）の制御
動的言語切り替えを頻繁に行う業務アプリにおいて見落がちなのが、マネージド・ヒープの断片化とアンマネージド・リソースの開放タイミングである。
`ComponentResourceManager` や、動的にロードされるサテライトアセンブリ（`{Culture}.resources.dll`）は、一度ロードされるとアプリケーションドメインにキャッシュされる特性を持つ。
1. サテライトアセンブリのメモリ肥大化対策
多言語対応で大量の文字列リソース（数万キー）を保持する場合、アプリケーションが常時メモリを食いつぶす。これを防ぐため、カスタムのリソースローダーを挟むか、不要になったカルチャのリソースキャッシュを明示的にクリアする設計が必要だ。
‘ メモリ解放の最終防衛ライン：明示的なGC強制実行のタイミング制御
Public Shared Sub PurgeResourceCache()
‘ サテライトアセンブリの参照が切れたことを確認し、ジェネレーション2まで回収
GC.Collect()
GC.WaitForPendingFinalizers()
GC.Collect()
End Sub
※注釈：GCの多用はパフォーマンスを害するが、モーダルダイアログで言語を切り替えた直後など、メモリプレッシャーが高まる遷移ポイントにおいて上記を限定的に呼び出すことで、リソース消費量を常にクリーンに保つことができる。
—
4. 現場で使える設計のベストプラクティス
1. コントロールの `Name` プロパティの厳格化
ResXによる多言語化の根幹は「コントロール名」の一意性である。デザイナーが自動生成する `Button1` のような名前のままにしておくと、リソースキーが衝突し破綻する。すべてのコントロールにプレフィックス（例: `btnSubmit`, `lblUserName`）を付与する命名規則を強制すること。
2. 動的生成コントロールのケア
実行時にコードビハインドから `New` 生成されたコントロール（検索結果グリッドの動的生成セルなど）は、上記エンジンの走査から漏れる。生成直後に必ず個別で `rm.ApplyResources(dynamicControl, dynamicControl.Name, currentCulture)` を実行するフックを用意せよ。
3. システム間連携ログ・メッセージの分離
UIの文言（ResX）と、外部APIやDBに送信するエラーコード（定数クラスやDB管理）は完全に分離すること。ローカライズ対象はあくまで「ユーザーの目に触れるプレゼンテーション層」に限定するのが、保守性を保つ唯一の道である。
—
総括
VB.NETにおけるWindows Forms開発はレガシーと片付けられがちだが、アンマネージド領域の制御と .NET Framework / .NET Core のメモリモデルを熟知していれば、現代のWebアプリケーションに匹敵する洗練された動的UI体験を構築できる。
ここに示した `DynamicLocalizationEngine` をベースに、自社のグローバル業務システムのアーキテクチャをアップデートし、パフォーマンスとメンテナンス性の極限を目指してほしい。
