как получить индекс элемента ToolStrip, на VB.NET

[TrueTrue]

Есть форма Form1.
На ней ToolStrip1.
В нём список элементов.
При клике на конкретный элемент, на ToolStrip1, выпадает ContextMenu1.

При нажатии на пункт "Удалить" в ContextMenu1, должен удаляться элемент на котором был установлен указатель мышки, при клике.
Но! Для удаления Элемента из ToolStrip1, требуется получить Index Элемента в списке элементов ToolStrip1. Как это сделать?

[alorion]

Один из способов:

Код: Выделить всё

    Private ClickedButton As ToolStripButton

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
        For Each button As ToolStripButton In ToolStrip1.Items
            AddHandler button.MouseDown, AddressOf ToolStripButton_MouseDown
        Next
    End Sub

    Private Sub ToolStripButton_MouseDown(sender As Object, e As MouseEventArgs)
        ClickedButton = sender
    End Sub

    Private Sub ContextMenuItem_Click(sender As Object, e As EventArgs) Handles ContextMenuItem.Click
        ToolStrip1.Items.Remove(ClickedButton)
    End Sub

Использовать индекс кнопки:

Код: Выделить всё

    Private IndexButton As Integer
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
        For Each button As ToolStripButton In ToolStrip1.Items
            AddHandler button.MouseDown, AddressOf ToolStripButton_MouseDown
        Next
    End Sub

    Private Sub ToolStripButton_MouseDown(sender As Object, e As MouseEventArgs)
        IndexButton = ToolStrip1.Items.IndexOf(sender)
    End Sub

    Private Sub ContextMenuItem_Click(sender As Object, e As EventArgs) Handles ContextMenuItem.Click
        ToolStrip1.Items.RemoveAt(IndexButton)
    End Sub

Все проверки опущены.