沢山あるチェックボックスを一度に設定する方法を教えて下さい

質問

チェックボックスが沢山あるのですが、
一度に同じ設定にしたり、チェックの変更のイベントを
一箇所で受け取ることは出来ないでしょうか？

一括の設定は下のようなことがしたいです。
For i As Integer = 1 To 100
CcheckBox(i).Checked = True
Next

変更のイベントを一箇所で取るというのは
100個のイベントプロシージャを作らずに
１つだけ作って、そこで変更のあったチェックボックス番号を
取得して、それを元に処理をしたいです。

どうぞよろしくお願いいたします。

回答No.1

1010101011 · ベストアンサー

.NETとVB6とで回答が異なります。
どちらを使用しているのでしょうか？
コントロール配列を使っていると考えると
VB6でしょうか？

その場合、新たにメソッドを作ってやればいいと思います。
例として

Private Sub Button_Click()
　　For i As Integer = 1 To 100
　　　　CheckBox(i).Checked = True
　　　　Call CheckBox_Check(CheckBox(i))
　　Next
End Sub

Private Sub CheckBox_Check(ByRef objChkBox as Object)
　　処理
End Sub

一括でチェックするときはこれでできますが、
個別でチェックしたときにイベントを走らせるには
100個分イベントを作って、上記のCheckBox_Checkを
実行するしかないですね。

VB6では、こんな感じです。