Vb.net 参数化子对象的处理程序

我的WinForm上有十个图像，我试图在一个子系统中处理这十个图像中任何一个的点击。 这些图像具有以下命名lblPlayer1、lblPlayer2等 我要做的是为任何被单击的图像调用click事件

Private Sub lblPlayer1_Click(sender As Object, e As EventArgs) Handles lblPlayer(X).Click

End Sub

可能吗

Private Sub lblPlayers_Click(Byval sender As Object,Byval e As EventArgs) Handles 
lblPlayer1.Click,
lblPlayer2.Click,
lblPlayer3.Click,
etc...

End Sub

否则：

SomeSub() handles mybase.load

  For each ctrl as control in {lblPlayer1, lblPlayer2, lblPlayer3, etc...}
      addhandler ctrl.click, adressof lblPlayers_Click
  Next ctrl

End Sub

Private Sub lblPlayers_Click(Byval sender As Object,Byval e As EventArgs)
 ' Stuff Here...
End Sub

可以采用逗号分隔的事件列表，因此您可以执行以下操作：

Private Sub lblPlayer1_Click(sender As Object, e As EventArgs) Handles lblPlayer1.Click, lblPlayer2.Click, lblPlayer3.Click, lblPlayer4.Click, lblPlayer5.Click, lblPlayer6.Click, lblPlayer7.Click, lblPlayer8.Click, lblPlayer9.Click, lblPlayer10.Click

End Sub

这将开始变得有点笨拙。您还可以使用

AddHandler

为表单构造函数或表单加载事件中的每个标签添加处理程序