请教怎样再单击一个控件的同时获取这个控件自身的tag值

请问怎样再单击一个控件的同时获取这个控件自身的tag值。
不能写成下面的形式：

Private   Sub   btnSetState_Click(ByVal   sender   As   System.Object,   ByVal   e   As   System.EventArgs)   Handles   btnSetState.Click
dim   i   as   integer
                i   =   btnSetState.tag
        End   Sub

因为我想实现的是单击多个按钮时只执行同一段代码，而获得他们各自的tag值。
请大家多多指教◎◎◎

------解决方案--------------------
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click, Button2.Click

Dim MyButton As Button = CType(sender, Button)
Dim btnTag As Integer = MyButton.Tag

End Sub

你可以看下msdn：如何：将多个事件连接到 Windows 窗体中的单个事件处理程序
ms-help://MS.MSDNQTR.v80.chs/MS.MSDN.v80/MS.VisualStudio.v80.chs/dv_fxmancli/html/5a20749a-41b5-4acc-8eb1-9e5040b0a2c4.htm

------解决方案--------------------
楼上正解
------解决方案--------------------
呵呵，不用那么麻烦
可以再看段代码。
Public Sub New()

' 此调用是 Windows 窗体设计器所必需的。
InitializeComponent()

' 在 InitializeComponent() 调用之后添加任何初始化。
For Each myControl As Control In Me.Controls
If TypeName(myControl) = "Button " Then
AddHandler myControl.Click, AddressOf btnClick
End If
Next myControl
End Sub
这样在窗体生成的时候就，就把每个button按钮的Click事件注册到了btnClick上面。这样你的问题就解决了。
------解决方案--------------------
多看看MSDN，我对这个也是新手：-）