Vb.net 如何为表单上的所有按钮创建通用onclick事件处理程序?

Vb.net 如何为表单上的所有按钮创建通用onclick事件处理程序?,vb.net,vba,Vb.net,Vba,我的表单上有10个按钮,我想知道是否有人能帮我为所有按钮编写一个onClick处理程序。 在按钮的“属性”窗口中,切换到“事件视图”,并输入未绑定到特定按钮的单击处理程序的名称(以明确它是一个不特定于单个控件的事件处理程序) 按Enter键创建并实现事件处理程序 依次选择其他按钮,并在“属性”窗口的组合框中选择之前创建的事件处理程序 在事件处理程序中,您可以将sender参数强制转换为按钮,这样就可以访问单击的按钮 Dim clickedBtn = TryCast(sender, Button

我的表单上有10个按钮,我想知道是否有人能帮我为所有按钮编写一个onClick处理程序。

  • 在按钮的“属性”窗口中,切换到“事件视图”,并输入未绑定到特定按钮的单击处理程序的名称(以明确它是一个不特定于单个控件的事件处理程序)
  • 按Enter键创建并实现事件处理程序
  • 依次选择其他按钮,并在“属性”窗口的组合框中选择之前创建的事件处理程序
在事件处理程序中,您可以将sender参数强制转换为按钮,这样就可以访问单击的按钮

Dim clickedBtn = TryCast(sender, Button)
If clickedBtn IsNot Nothing Then
    ' Do something with the button
End If

当然,区别不应该太大——对于在后台调用公共方法的按钮的不同事件处理程序,IF/SELECT CASE的长列表不是一个好的选择

没什么特别的,你能帮忙吗@saamorimThanks@Markus,它对我非常有效。有一个愉快的周末。