Visual Basic 中学校 > VB.NET サンプル >
イベントとプロシージャを関連付ける
以下の例ではButton1をクリックしたときにSampleプロシージャが呼び出される。
Private Sub Sample(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MsgBox("Button1です")
End Sub
以下の例ではButton1をクリックしたときにSampleプロシージャが呼び出される。
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
AddHandler Button1.Click, AddressOf Sample
End SubPrivate Sub Sample(ByVal sender As System.Object, ByVal e As System.EventArgs)
MsgBox("Button1です")
End Sub
以下の例ではButton1またはButton2をクリックしたときにSampleプロシージャが呼び出される。
Private Sub Sample(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click, Button2.Click
MsgBox("Button1またはButton2です")
End Sub
以下の例ではButton1のClickイベントとSampleプロシージャの結びつきを解除する。
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
RemoveHandler Button1.Click, AddressOf Sample
End SubPrivate Sub Sample(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MsgBox("Button1ですか?")
End Sub