Access VBAの深淵：ダイアログフォームによる同期制御とメモリ管理の極致
Access開発において、`DoCmd.OpenForm` を単なる「画面遷移」として捉えているうちは、ジュニアエンジニアの域を出ない。真のアーキテクトにとって、ダイアログモードでのフォーム呼び出しは、「メインスレッドの凍結と、スタックフレームを超えたデータ同期の儀式」である。
今回は、単なるポップアップ表示に留まらない、堅牢でメモリ効率を極限まで高めたダイアログ制御の実践論を解き明かす。
—
1. DoCmd.OpenFormの「WindowMode」がもたらす真の設計思想
`acDialog` を指定してフォームを開くと、VBAの実行は当該フォームが閉じるか非表示になるまで完全に停止する。この「同期処理」こそが、堅牢なデータ入力UIを構築するための鍵だ。
しかし、多くの開発者は「開く」だけで満足し、呼び出し元への結果返却とリソースのライフサイクル管理を疎かにしている。
なぜ `acDialog` を使うのか
単なる「モーダル」以上の意味がある。それは、呼び出し元のコンテキスト（ローカル変数やオブジェクト状態）を維持したまま、別スコープでの処理を挟み込める点にある。この「一時停止」を逆手に取り、値を確実に呼び出し元へ戻す設計が必要だ。
—
2. 厳格なデータ同期：プロパティとイベントの連動
ダイアログフォームから値を戻す際、グローバル変数を使うのはアーキテクトとして禁じ手だ。メモリリークと予期せぬ状態遷移の温床となる。
推奨するのは、「呼び出し元がフォームのインスタンスを保持し、閉じる直前にプロパティを読み取る」パターンである。
‘ 呼び出し元 (MainForm)
Public Sub OpenEditor()
Dim frm As Form_frmEditor
‘ フォームをダイアログとして開く（戻り値を取得するためにインスタンス参照を保持）
DoCmd.OpenForm “frmEditor”, WindowMode:=acDialog
‘ acDialogのため、ここから下の処理はフォームが閉じるまで待機する
If CurrentProject.AllForms(“frmEditor”).IsLoaded Then
Set frm = Forms(“frmEditor”)
‘ フォーム内のPublicプロパティから値を取得
If frm.IsConfirmed Then
Debug.Print “取得した値: ” & frm.ResultValue
End If
‘ 明示的なオブジェクトの破棄（Accessのメモリ管理を制御下に置く）
DoCmd.Close acForm, “frmEditor”
End If
End Sub
—
3. レガシー環境を支配する：APIによるウィンドウ制御
Accessの標準機能だけでは、マルチモニター環境やタスクバーの挙動制御で限界が来る。ここでWindows APIの出番だ。特に `SetWindowPos` を組み合わせることで、ダイアログの「居場所」を強制的に制御できる。
‘ ユーザー32ビットAPIによるウィンドウ制御
Private Declare PtrSafe Function SetWindowPos Lib “user32” ( _
ByVal hwnd As LongPtr, ByVal hWndInsertAfter As LongPtr, _
ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, _
ByVal wFlags As Long) As Long
‘ ダイアログを常に最前面に固定するなどの制御が可能
Private Const HWND_TOPMOST = -1
これをフォームの `Open` イベントで呼び出せば、他のWindowsアプリケーションに埋もれない、業務システムとしての「品格」ある入力画面を構築できる。
—
4. メモリ最適化と「見えないコスト」
Accessは、フォームを閉じただけではメモリ上のリソースを即座に解放しない場合がある。特に複雑なクラスモジュールを多用するシステムでは、`Form_Unload` イベントでのクリーンアップが不可欠だ。
‘ フォームの終了処理（カプセル化された掃除）
Private Sub Form_Unload(Cancel As Integer)
‘ 内部で使用した複雑なオブジェクト（ADOコネクションやクラス）の明示的解放
Set m_LogicEngine = Nothing
‘ メモリ開放のヒントを与える（OSへのアピール）
DoCmd.Echo True
End Sub
—
5. 伝説的アーキテクトからの提言
Access VBAは「古い技術」ではない。「コンテキストの切り替えが最も容易な、極めて高密度な開発プラットフォーム」である。
- グローバル変数を排除せよ： すべてのデータはインスタンスのプロパティとして受け渡せ。
- 同期処理を信頼せよ： `acDialog` はスレッドセーフな同期を実現する強力な武器である。
- APIを恐れるな： Accessの限界はWindows APIで突破できる。
コードを書くとき、常に「このオブジェクトはいつ生まれ、どこで死ぬべきか」を自問自答せよ。その意識の積み重ねが、何年経っても壊れない、静かなる傑作システムを生み出すのだ。
この知見が、あなたの次のビルドを、より堅牢で美しいものにすることを期待している。
