Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _

Handles Button1.Click, Button2.Click

Select Case sender.name

Case "Button1"

MsgBox("你点击的是button1")

Case "Button2"

MsgBox("你点击的是button2")

End Select

End Sub






“在Handles后面写了两个事件的声明，就可以在同一段代码中对两个对象进行控制。另外，利用Sender和e我们还可以更方便地构建与调用自己的事件处理程序。“大李边写边说。

“是吗？怎么实现？”我不由被激发出了浓浓的兴趣。

（未完待续）