Question

当有很多label(button)时,他们都有MouseMove事件，事件在那个控件上触发就改变这个控件的颜色 vbnet

比如
Private Sub PlayAudio(sender As Object, e As Object) Handles Label_list1.DoubleClick, Label_list2.DoubleClick, _
Label_list3.DoubleClick, Label_list4.DoubleClick, Label_list5.DoubleClick, Label_list6.DoubleClick, _
Label_list7.DoubleClick, Label_list8.DoubleClick
‘’‘事件
call sub123(序号)
End Sub
怎么获取双击的label的名字呀，应为有名字就可以获取名字后面的序号（1-8），这样就可以在双击不同label时，可执行不同事件

Answer 1

Public Class btnfrm

    Private Sub Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click, Button2.Click, Button3.Click, Button4.Click, Button5.Click

        Dim str As String = CType(sender, Button).Text

        If str = "button1" Then

            MsgBox("b1", MsgBoxStyle.Information, "提示")

        ElseIf str = "button1" Then

            MsgBox("b2", MsgBoxStyle.Information, "提示")

        End If

    End Sub

End Class

Answer 2

QQ：470692236