Bonjour j'ai une listbox et j'y ajoute des pseudos. Je voudrais que lorsque je clique sur le doouton droit de la souris j'ai un ContextMenu qui apparait. Comment assigner ce ContextMenu à chaque pseudo ds la listbox et nom a la listBox ??
Voici mon code :
Code :
- Private WithEvents NContextMenu As New ContextMenu
- Private WithEvents MnuAjoutContact As New MenuItem("&Ajouter un contact" )
- Private Sub NContextMenu_Popup1(ByVal sender As Object, ByVal e As System.EventArgs) Handles NContextMenu.Popup
- With NContextMenu
- Select Case NContextMenu.SourceControl.Name
- Case Is = List_Clt.Name
- .MenuItems.Add(MnuAjoutContact)
- End Select
- End With
- End Sub
|
Merci bcp
Message édité par fdiedler le 19-08-2005 à 14:41:08