Question

vb.net中定义控件数组，控件数组中加入多个按钮。怎么能在控件数组事件响应对应按钮的事件，代码部分：

Dim bt As New ArrayList
bt.Add(Me.Button5)
bt.Add(Me.Button6)
bt.Add(Me.Button7)
Private Sub btClick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click, Button6.Click, Button7.Click
Select Case bt??? '这里该怎么索引到按钮的事件？
Case "1"
MessageBox.Show("你点击了 Button5 按钮")
Case "2"
MessageBox.Show("你点击了 Button6 按钮")
Case "3"
MessageBox.Show("你点击了 Button6 按钮")
End Select

End Sub

Answer 1

Dim bt As New ArrayList
bt.Add(Me.Button5)
bt.Add(Me.Button6)
bt.Add(Me.Button7)

上面这段代码本人表示不懂，故没有使用。下面的代码在VS2015中运行通过：
Private Sub btClick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click, Button6.Click, Button7.Click
Select Case CType(sender, Button).Name
Case "Button5"
MessageBox.Show("你点击了 Button5 按钮")
Case "Button6"
MessageBox.Show("你点击了 Button6 按钮")
Case "Button7"
MessageBox.Show("你点击了 Button7 按钮")
End Select
End Sub

Answer 2

纵观绰斩放入涯乱