Узнать имя выбранного дочернего элемента в ToolStrip

 Private Sub ToolStripButton1_Click(sender As Object, e As System.EventArgs) Handles ToolStripButton1.Click
        Dim bName As String = CType(sender, Windows.Forms.ToolStripButton).Text
        MsgBox(bName)
    End Sub
 
    Private Sub ToolStripButton2_Click(sender As Object, e As System.EventArgs) Handles ToolStripButton2.Click
        Dim bName As String = CType(sender, Windows.Forms.ToolStripButton).Text
        MsgBox(bName)
    End Sub

 Private Sub ToolStrip1_ItemClicked_1(sender As Object, e As ToolStripItemClickedEventArgs) Handles ToolStrip1.ItemClicked
        bName='Текст выбранного ToolStripButton
        MsgBox(bName)
'Вопрос в том - как узнать выбранную кнопку.
    End Sub

 Private Sub ToolStripButton1_Click(sender As System.Object, e As System.EventArgs) Handles ToolStripButton1.Click
        Dim btn As String = CType(sender, Windows.Forms.ToolStripButton).Name
        MsgBox(btn)
    End Sub

 Private Sub ToolStripButtonAll_Click(sender As System.Object, e As System.EventArgs) Handles ToolStripButton1.Click,
        ToolStripButton2.Click, ToolStripButton3.Click, ToolStripButton4.Click
        Dim btn As String = CType(sender, Windows.Forms.ToolStripButton).Name
        MsgBox(btn)
    End Sub

 Private Sub ToolStrip1_ItemClicked(ByVal sender As Object, ByVal e As System.Windows.Forms.ToolStripItemClickedEventArgs) Handles ToolStrip1.ItemClicked
        Dim ItemName As String = e.ClickedItem.Name
        MsgBox(ItemName)
 End Sub