我宣布了一个全局变量按钮:
Dim button1 As New Button()
现在,我不知道如何在此按钮中添加点击事件,因为它是一个变量。你知道我该怎么做吗?
答案 0 :(得分:3)
AddHandler button1.click, AddressOf MyClickEventHandler
(MSDN Documentation)
您必须确保使用与任何其他Click事件处理程序相同的签名定义MyClickEventHandler
(即Sub MyClickEventHandler(ByVal sender as Object, ByVal e as EventArgs)
)
答案 1 :(得分:3)
Addhandler方式可能就像上面提到的那样。您的另一个选择是按以下方式声明您的按钮:
Dim withEvents button1 As New Button()
Private Sub button1_ClickHandler(ByVal sender As Object, ByVal e As EventArgs) Handles button1.click
'Handle stuff
End Sub
如果您要在设计器中拖动表单上的按钮,这样就可以模拟VS为您所做的事情。
AddHandler方式的优点是,如果需要,您也可以动态删除处理程序。
答案 2 :(得分:2)
AddHandler button1.Click, AddressOf MyEventHandler
Sub MyEventHandler(ByVal sender As Object, ByVal e As EventArgs)
'
' Code to be executed when the event is raised.
'
MsgBox("I caught the event!")
End Sub