удаление ToolBar.Buttons.ButtonMenu

есть в вб65 такой забавный глюк:
на форму бросаем тулбар, делаем в нем одну кнопку стиля tbrDropdown
закидываем на форму эти 3 строки кода

Private Sub Form_Load()
Dim i&

For i = 1 To 20
Toolbar1.Buttons(1).ButtonMenus.Add , "Table " & i, "Table " & i
Next

End Sub

Private Sub Toolbar1_ButtonMenuClick(ByVal ButtonMenu As MSComctlLib.ButtonMenu)

MsgBox ButtonMenu.Key
Toolbar1.Buttons(1).ButtonMenus.Remove ButtonMenu.Key

End Sub


и наслаждаемся багом:
клацаем на "Table 1", видим соотв мессагу "Table 1", пункт меню удаляется.
клацаем на "Table 3", видим НЕСООТВЕТСТВУЮЩУЮ мессагу "Table 4"!
в общем случае это выглядит так: после удаления N-го п.меню и выбора
N+iго п.меню в событие Toolbar1_ButtonMenuClick передается N+i+1й п.меню
(еще интересно, что еси клацнуть по "Table 2", т.е. по следующей за удаленной, то все ок)
что это за лажа и как с этим бороться?