実行時に、イベントをイベントハンドラに関連付ける。
AddHandler event , AddressOf eventhandler
event…処理するイベントの名前
eventhandler…イベントを処理するプロシージャの名前
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
MakeLBArray()
For i As Integer = 1 To UBound(lb)
AddHandler lb(i).Click, AddressOf Label1_Click
Next
End Sub
Private Sub MakeLBArray()
lb(1) = Me.Label1
lb(2) = Me.Label2
lb(3) = Me.Label3
lb(4) = Me.Label4
lb(5) = Me.Label5
lb(6) = Me.Label6
lb(7) = Me.Label7
lb(8) = Me.Label8
lb(9) = Me.Label9
lb(10) = Me.Label10
lb(11) = Me.Label11
lb(12) = Me.Label12
lb(13) = Me.Label13
lb(14) = Me.Label14
lb(15) = Me.Label15
End Sub
Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
’ イベントの処理を記載する
End Sub
このように、イベントの処理を関連付けることができます。
逆に、関連付けを削除する場合は、
RemoveHandlerというものがあります。
システム開発のためのVB.NETプログラミング関係一覧に戻る
