Определить, какая кнопка на веб-форме нажата - Visual Basic .NET

Формулировка задачи:

Приветствую, коллеги! Кратенько - суть проблемы: Формирую текстовый документ html-стандарта. Веббровзером его открываю. Кнопки в документе именуются с добавлением в хвост имени текущей итерации цикла: enter0, enter1, enter2... Помимо имени у кнопок есть ID. Он идентичен именам. =================================================

Задача:

отследить - какая кнопка нажата в веббровзере...

Инструмент:

Нашел в сети хавтуху)) в виде:

'декларация переменной
Public WithEvents elmHTML As HtmlElement
 
Private Sub WBrowser_Navigated(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserNavigatedEventArgs) Handles WBrowser.Navigated
    'пров наличия загр документа
    If (WBrowser.Document IsNot Nothing) Then
        elmHTML = WBrowser.Document.GetElementById("enter")
        If elmHTML IsNot Nothing Then
            AddHandler elmHTML.Click, AddressOf elmHTML_Click
        End If
    End If
End Sub

Private Sub elmHTML_Click(ByVal sender As Object, ByVal e As HtmlElementEventArgs) 'Handles elmHTML.Click
    MsgBox("Ура получилось.")
End Sub

Для работы с одной кнопкой - подходит. Но при попытке работать с множеством кнопок - опа... Студия всегда считает, что нажата последняя кнопка, хотя в переменной sender в процедуру приходят значения Name и Id нажатой кнопки (смотри скрин). Однако условие (в коде на скрине) отрабатывает второе. Пробовал по параметрам Name, Id, Value... Научите, как победить ситуевину... Ну и на всякий случай - код формирования страницы с кнопками:

Dim PageHtmlHeader As String = "" & vbNewLine & ""
 
            Dim PageHtmlStyle As String = "" & vbNewLine & "" & vbNewLine & vbNewLine & ""
 
            Dim PageHtmlBody As String = "" : Dim PageHtmlReslt As String = ""
            ReDim WebBttName(DTNotes.Rows.Count - 1)
 
            For create As Integer = 0 To DTNotes.Rows.Count - 1
                PageHtmlBody &= "" & vbNewLine
                PageHtmlBody &= "" & DTNotes(create)(2) & "" & vbNewLine
                PageHtmlBody &= "" & DTNotes(create)(1) & "" & vbNewLine & _
                                "" & DTNotes(create)(6) & "" & vbNewLine
                PageHtmlBody &= "" & vbNewLine & DTNotes(create)(3) & vbNewLine & "" & vbNewLine
                If Not IsNothing(DTNotes(create)(4)) And DTNotes(create)(4) <> "" Then
                    PageHtmlBody &= "" & _
                        vbNewLine & DTNotes(create)(4) & vbNewLine & "" & vbNewLine
                End If
                PageHtmlBody &= "" & _
                    ""
 
                WebBttName(create) = "enter" & create.ToString
                PageHtmlBody &= "" & vbNewLine
            Next create
 
            PageHtmlReslt = PageHtmlHeader & vbNewLine & PageHtmlStyle & vbNewLine & PageHtmlBody & vbNewLine & ""
            TextBox1.Text = PageHtmlReslt
            File.WriteAllText(SetFilePth & "slf29.slf", PageHtmlReslt)
            '===========ФОРМИРУЕМ СОДЕРЖИМОЕ ВЕБ-СТРАНИЦЫ============================================================
 
            WebBrNotes.Navigate(SetFilePth & "slf29.slf")

Решение задачи: «Определить, какая кнопка на веб-форме нажата»

textual
                            Листинг программы 
                        

                                 Private Sub elmHTML_Click(ByVal sender As Object, ByVal e As HtmlElementEventArgs) 'Handles elmHTML.Click
        If sender.Id = "enter0" Then
            MsgBox("BTT 0")
        ElseIf sender.Id = "enter1" Then
            MsgBox("BTT 1")
        End If
    End Sub
                        