stuck in Context menu

[anin]

Hi,

I'm using the below code to show a context menu and then some 30+ items in the subcontext menu. I've got an addhandler and the control is passed to CMenuClick when I click on the subcontext menu item but unable to capture the click event and the index(or item) of the clicked subcontext menu item.

Any help would be greatly appreciated.

Cpopmenu = New ContextMenu()
Cpopmenu.MenuItems.Add(New MenuItem("&Choose Columns"))
Cpopmenu.MenuItems.Add(New MenuItem("&Select All Columns"))
Cpopmenu.MenuItems.Add(New MenuItem("&Properties"))
 
Me.ContextMenu = Cpopmenu
 
For i As Integer = 0 To colcnt - 1
Cpopmenu.MenuItems.Item(0).MenuItems.Add(x.Label)
Next
 
 
 
AddHandler Me.Click, AddressOf CMenuClick
End Sub
Private Sub CMenuClick(ByVal sender As Object, ByVal e As System.EventArgs)
 
End Sub

 

[JohnH]

When you create contextmenu and menuitems in code it is the MenuItem you AddHandler for, not the form (Me). Example:

Dim mi As MenuItem 
mi = New MenuItem("&Choose Columns")
AddHandler mi.Click, AddressOf CMenuClick
Cpopmenu.MenuItems.Add(mi)

If you add the same event handler for several objects you get which object caused the event from the 'sender' object parameter of the event handler method.

And please post in most appropriate forum, moved to Menus forum.