menu in columnheader

how can i make a menu popup when a columnheader is clicked in a listview?

Code:

---

Private Sub ListView1_ColumnClick(ByVal ColumnHeader As MSComctlLib.ColumnHeader)
  Select Case ColumnHeader.Index
    Case 1
      PopupMenu mnuMyMenu
  End Select
End Sub

---

I dunno how to make it popup if you right-clicked it though. :(

tnx.. i'll piddle with it for a bit and post back..

I have the same problem. How to detect right-click of the mouse over columnheader?