C# と VB.NET の質問掲示板

■No77117 (まあさ さん) に返信

制御用クラスを作成する方法

Public Class Form1
    Private Class CtlCheckPanel
        Private WithEvents _Chk As CheckBox
        Private _Pnl As Panel

        Public Sub New(Chk As CheckBox, Pnl As Panel)
            _Chk = Chk
            _Pnl = Pnl
        End Sub

        Private Sub _Chk_CheckedChanged(sender As Object, e As System.EventArgs) Handles _Chk.CheckedChanged
            _Pnl.Enabled = _Chk.Checked
        End Sub
    End Class

    Private _CtlList As List(Of CtlCheckPanel)

    Public Sub New()
        ' この呼び出しはデザイナーで必要です。
        InitializeComponent()

        ' InitializeComponent() 呼び出しの後で初期化を追加します。
        _CtlList = New List(Of CtlCheckPanel)
        _CtlList.Add(New CtlCheckPanel(CheckBox1, Panel1))
        _CtlList.Add(New CtlCheckPanel(CheckBox2, Panel2))
        _CtlList.Add(New CtlCheckPanel(CheckBox3, Panel3))
    End Sub

End Class