关于动态生成按钮的问题，请各位大虾指教

我在page_load的时候根据数据库的点动态生成了一组按钮，代码如下：
For Each dr In tblSport.Rows
            btnSport = New Button
            btnSport.ID = dr("活动项控制参数").ToString
            btnSport.Text = dr("活动项名称")
            btnSport.Style("Position") = "absolute"
            btnSport.Style("Height") = 25
            btnSport.Style("Width") = 100
            btnSport.Style("Top") = 10
            btnSport.Style("Left") = 130 * count + 20
            count = count + 1
            AddHandler btnSport.Click, AddressOf btnSport_Click
            Page.Controls(1).Controls.Add(btnSport)
Next按钮的响应事件为
Private Sub btnSport_Click(ByVal sender As Object, ByVal e As System.EventArgs)
      btnSport.BackColor = Color.Green
      ...
      （别的执行程序）
end sub我的原意是想让哪个按钮被点击之后，其背景就能呈现绿色，但是发现用上面的方法，不管点哪个按钮，都是最后生成的那个按钮变成绿色我查了一些资料，可以通过sender.id能够找到是点的第几个按钮，但是如何让对应的按钮变颜色呢？请各位大虾给小弟指教指教，急，在线等～～