CheckBoxのCheckedChangeプロシージャを実行したい

質問

ＶＢ．ＮＥＴ、ＷｉｎｄｏｗｓＸＰなのですが、
CheckBox1_CheckedChangedのプロシージャーを
コードで実行するようにしたいのですが、
そのようなことはできるでしょうか？
（チェックの状態を変更しなくて実行したい）

CheckedChangedプロシージャに
CheckBox1Changed()
を書いておいて中身を外の
Sub CheckBox1Changed()
・・・
End Sub
のプロシージャに書くという方法を思いついたのですが、
チェックボックスが沢山あるので、出来ればそのようなことを
しなくてもできるのであれば、その方法でやりたいです。
よろしくお願いいたします。

回答No.1

mjsamiasan · ベストアンサー

1.各々にイベントハンドラを追加する方法
※１全てのチェックボックスに付加する場合はAndAlso以下はいりません。
※２test内部は超てきとうです。
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
　　For Each objControl As Windows.Forms.Control In Me.Controls
　　　　If objControl.GetType Is GetType(Windows.Forms.CheckBox) _
　　　　　　AndAlso objControl.Name.IndexOf("myCheckBox") > 0 Then

　　　　　　AddHandler CType(objControl, Windows.Forms.CheckBox).CheckedChanged, AddressOf test
　　　　End If
　　Next
End Sub

Private Sub test(ByVal sender As Object, ByVal e As System.EventArgs)
　　CType(sender, Windows.Forms.CheckBox).Checked = False
End Sub

2.ユーザーコントロールを作成する方法。
MSDN 10 行でズバリ !! Windows フォーム向けユーザー コントロールの作成 (VB)
http://www.microsoft.com/japan/msdn/thisweek/300x10/phase2/winform_usercontrol/vb.aspx

ぐらいでしょうか。私的にはユーザーコントロールを作成する方がおすすめです。

お礼

ご回答をお寄せ頂きましてありがとうございます。
１の方法で目的の動作をさせることができました。
違いについて考えて適した方を使ってみたいと思います。
ありがとうございました。