画面を「描く」のではなく「生み出す」：VB.NETで実現する動的UI構築の極意
こんにちは。現場で長年システムを設計していると、よくこんな相談を受けます。
「画面の項目数が顧客によって違うんです。いちいち画面を増やしていたらキリがありません」
その悩み、今日で卒業しましょう。VB.NETの真骨頂は、デザイン画面でポチポチとボタンを配置することだけではありません。「実行時にコードでUIを生成し、命を吹き込む（イベントを結びつける）」ことこそが、真の自動化エンジニアへの入り口です。
今日は、初心者の方がマクロの世界から一歩抜け出し、「動的フォーム生成」という魔法を手に入れるための設計思想をお伝えします。
—
1. なぜ「動的生成」が必要なのか？
通常、Visual Studioのデザイナーで配置したボタンは「静的」です。しかし、業務システムでは以下のようなケースが頻発します。
- 設定ファイル（JSON等）に基づいて入力項目が増減する
- データベースの定義に従って、動的にグリッドや入力欄を生成したい
これを実現する鍵は、`AddHandler`と`AddressOf`という2つの武器です。
—
2. 魔法の呪文：AddHandler と AddressOf
コードでボタンを生成し、クリックしたときに動く関数（イベントハンドラ）を後から結びつける。このプロセスを理解すれば、あなたのUIは無限に拡張可能です。
実践コード：動的ボタン生成の設計図
まずは、ボタンを生成し、クリックイベントを接続する最小単位のコードを見てみましょう。
Public Class DynamicForm
Private Sub DynamicForm_Load(sender As Object, e As EventArgs) Handles MyBase.Load
‘ 1. ボタンをインスタンス化（メモリ上に作る）
Dim btn As New Button()
btn.Text = “動的ボタン”
btn.Location = New Point(50, 50)
‘ 2. イベントを配線する（ここが重要！）
‘ btn_Click というメソッドを、このボタンのクリックイベントに関連付けます
AddHandler btn.Click, AddressOf btn_Click
‘ 3. フォームのコントロール集合に追加（画面上に表示させる）
Me.Controls.Add(btn)
End Sub
‘ クリックされたときに実行される関数
Private Sub btn_Click(sender As Object, e As EventArgs)
‘ sender には、イベントを発生させたボタンそのものが入っています
Dim clickedButton As Button = DirectCast(sender, Button)
MessageBox.Show(clickedButton.Text & ” がクリックされました！”)
End Sub
End Class
ここがポイント！
- `AddHandler`: 「このイベントが発生したら、この関数を呼び出してくれ」という契約を結ぶ命令です。
- `AddressOf`: 関数の「場所（アドレス）」を指し示す演算子です。これがないと、どの関数を呼べばいいかコンピュータは迷子になります。
- `DirectCast`: 汎用的な `sender`（オブジェクト）を、元の `Button` 型にキャスト（変換）して扱います。
—
3. 初心者が陥りやすい「3つの罠」
現場でよく見る「動かない！」「エラーが出る！」という原因のほとんどは以下のどれかです。
① `Controls.Add` を忘れる
コードで `New Button()` しても、それを `Me.Controls.Add()` しなければ、ボタンはメモリの中にいるだけで、画面には一向に現れません。「透明人間」を作らないように注意しましょう。
② イベントハンドラの引数が違う
`AddHandler` で結びつけるメソッドは、決まった引数（`sender As Object, e As EventArgs`）を持っている必要があります。これがないと、VB.NETは「そんな命令は受け取れない」とエラーを吐きます。
③ ライフサイクルの管理（メモリリーク）
動的に大量のコントロールを生成・破棄する場合、`RemoveHandler` で適切に解除しないと、メモリが解放されずアプリが重くなることがあります。使い終わったら綺麗に片付ける。これが一流のエンジニアの流儀です。
—
4. 次のステップへ：JSONやDBから生成する
ここをクリアできれば、次は「リストデータからUIを生成する」というループ処理に挑戦してみてください。
‘ 例：データリストからボタンを整列させる
Dim titles As String() = {“保存”, “キャンセル”, “削除”}
For i As Integer = 0 To titles.Length – 1
Dim b As New Button()
b.Text = titles(i)
b.Top = 100 + (i 40) ‘ 縦に並べる
AddHandler b.Click, AddressOf Common_Click
Me.Controls.Add(b)
Next
このように、ループと条件分岐を組み合わせれば、どんなに複雑な画面定義であっても、プログラムが勝手に画面を構築してくれます。
—
最後に：エンジニアとして一番大切なこと
今回紹介した技術は、単なる「便利なコード」ではありません。「UIをデータとして扱う」という設計思想そのものです。
画面をコードで制御できるようになると、あなたは「画面をデザインする人」から「画面を生成するシステムを作る人」へと進化します。最初は難しく感じるかもしれませんが、`AddHandler` を書いた瞬間の「自分の意図した通りにボタンが反応した！」という感動は、エンジニアにとっての宝物です。
まずは簡単なボタン1つから、ぜひ実験してみてください。あなたのVB.NETライフが、より創造的で楽しいものになることを心から応援しています。
ここをクリアすれば、もうあなたは初心者ではありません。自信を持って次のステップへ進んでくださいね！
