ContextMenu - Popup

[Mark Gambo]

I am using the following code to display a popup menu for a particular node of a treeview:

Private Sub TreeView1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles TreeView1.MouseUp
        Dim mnuContextMenu As New ContextMenu()
        If e.Button = Windows.Forms.MouseButtons.Right Then
            Dim mnuItemNew() As MenuItem = New MenuItem() _
                        {New MenuItem("Item 1"), _
                        New MenuItem("Item 2"), _
                        New MenuItem("Item 3")}
 
            Dim TVWMenu As New ContextMenu(mnuItemNew)
            TVWMenu.Show(TreeView1, New Point(e.X, e.Y))
        End If
    End Sub

My question is how do I have a separator line appear Item 2 and Item 3? How can I tell which item was clicked? I have tried the following code but it didn't work:

Private Sub ContextMenuStrip1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles ContextMenuStrip1.Click
        MsgBox(ContextMenuStrip1.Text)
    End Sub

Thanks

[jmcilhinney]

If you want to place a seperator in a menu you just add an item and make its text a single dash. You handle the Click event of each menu item individually. To create a Click event handler for an item just double-click it (the item, not the menu) in the designer.

[RobDog888]

But if your creating the menu items dynamically then you need to use the AddHandler/RemoveHandler methods.

[Mark Gambo]

But if your creating the menu items dynamically then you need to use the AddHandler/RemoveHandler methods.

Rob I found this example here:

Sub TestEvents()
    Dim Obj As New Class1
    ' Associate an event handler with an event.
    AddHandler Obj.Ev_Event, AddressOf EventHandler
    ' Call the method to raise the event.
    Obj.CauseSomeEvent()
    ' Stop handling events.
    RemoveHandler Obj.Ev_Event, AddressOf EventHandler
    ' This event will not be handled.
    Obj.CauseSomeEvent()
End Sub
 
Sub EventHandler()
    ' Handle the event.
    MsgBox("EventHandler caught event.")
End Sub
 
Public Class Class1
    ' Declare an event.
    Public Event Ev_Event()
    Sub CauseSomeEvent()
        ' Raise an event.
        RaiseEvent Ev_Event()
    End Sub
End Class

But I can't figure out how to implement could you help me out?

Thanks