Hello all, I am creating a bunch of buttons on a form at runtime, which seems to all work great. The issue that is driving me nuts... I cannot seem to get the right button name when clicking one of them on the form. Each button location, name etc is coming from a text file. I have no problems with adding the buttons, naming them, applying tooltips etc. Only what is going on after the fact is where my trouble is.

Code:
 Sub CreateBtns()

        Dim rawData As String
        Dim FILE_NAME As String = "C:\temp\test.txt"
        Dim data()

        Dim objReader As New System.IO.StreamReader(FILE_NAME)

        Top = 0
        Left = 0

        Do While objReader.Peek() <> -1
            rawData = objReader.ReadLine()
            data = Split(rawData, ",")

            Dim dynamicButton As New Button

            dynamicButton.Height = 5
            dynamicButton.Width = 5
            dynamicButton.Location = New Point(CInt(data(2)), CInt(data(3)))
            dynamicButton.FlatStyle = FlatStyle.Flat
            dynamicButton.BackColor = Color.Magenta
            dynamicButton.ForeColor = Color.Magenta
            dynamicButton.BackColor = Color.Transparent
            dynamicButton.ForeColor = Color.FromArgb(10, Color.Transparent)
            dynamicButton.Name = data(0)
            dynamicButton.FlatAppearance.BorderColor = Color.Aqua
            dynamicButton.Font = New Font("Georgia", 6)
            AddHandler dynamicButton.Click, AddressOf DynamicButton_Click
            Controls.Add(dynamicButton)
            Dim myToolTipText = data(0) & " / " & data(1)
            ToolTip1.SetToolTip(dynamicButton, myToolTipText)
        Loop

    End Sub

    Private Sub DynamicButton_Click(ByVal sender As Object, e As MouseEventArgs)

        For Each cntrl In Me.Controls
            If TypeOf cntrl Is Button Then

                Dim btn As Button = DirectCast(cntrl, Button)
                   '''>>> Getting name is always wrong (btn.name)
                Exit Sub
            End If
        Next
    End Sub