我声明了一个全局变量按钮:
将按钮 1 变暗为新按钮()
现在,我不知道如何在此按钮中添加单击事件,因为它是一个变量。你知道我该怎么做吗?
AddHandler button1.click, AddressOf MyClickEventHandler
(MSDN 文档)
您必须确保MyClickEventHandler
使用与任何其他 Click 事件处理程序相同的签名定义(即Sub MyClickEventHandler(ByVal sender as Object, ByVal e as EventArgs)
)
如前所述,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 方式的优点是,如果需要,您也可以动态删除处理程序。
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