Checking which button got selected first

Public Class MyButton
    Inherits Button

    Dim iCounter As Integer = 0
    Dim co As Integer = 0

    Property ClickOrder() As Integer
        Get
            Return co
        End Get
        Set(ByVal value As Integer)
            co = value
        End Set
    End Property

    ReadOnly Property ClickedCount() As Integer
        Get
            Return iCounter
        End Get
    End Property

    Private Sub MyButton_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Click
        iCounter += 1
    End Sub

End Class

Public Class Form1

    Private WithEvents btn As MyButton
    Dim i As Integer = 0

    Public Sub New()

        ' This call is required by the Windows Form Designer.
        InitializeComponent()

        ' Add any initialization after the InitializeComponent() call.
        Dim i As Integer = 0
        'add 10 MyButtons 
        For i = 0 To 9
            btn = New MyButton
            With btn
                .Name = "button" & Int(i + 1).ToString
                .Text = .Name
                .Parent = Me
                .Left = 8
                .Top = 24 * i + 4
                .Width = 75
                .Height = 24
                'add event handler
                AddHandler btn.Click, AddressOf btn_Click
            End With
            'clickedBtns.Add(btn)
        Next

    End Sub

    'event handler for MyButton
    Private Sub btn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btn.Click
        Dim b As MyButton = sender
        i += 1
        b.ClickOrder = i
        MsgBox(b.Name & " has been clicked: " & b.ClickedCount.ToString & " time(s)." & vbCr & _
                "Click order: " & b.ClickOrder.ToString, MsgBoxStyle.Information, "Message...")

    End Sub
End Class