
28/02/2009, 11:16
|
Colaborador | | Fecha de Ingreso: enero-2008 Ubicación: Unas veces aquí, otras veces allí
Mensajes: 1.482
Antigüedad: 17 años, 2 meses Puntos: 37 | |
Respuesta: context menu strip en vb 2008 Cita:
Iniciado por cslbcn Hola a todos.
tengo un listview lleno de items. Quiero que cuando seleccione cualquier item con el botón secundario del ratón me salga un context menu strip (si es este el objeto que debo usar).
Gracias de antemano.
Un saludo Hola!
podría ser algo como esto (adapta el ejemplo a tus necesidades):
Código:
Public Class Form1
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim cm As New ContextMenu
cm.MenuItems.Add("Item 1", New System.EventHandler(AddressOf Me.Item_OnClick))
cm.MenuItems.Add("Item 2", New System.EventHandler(AddressOf Me.Item_OnClick))
cm.MenuItems.Add("Item 3", New System.EventHandler(AddressOf Me.Item_OnClick))
cm.MenuItems.Add("Item 4", New System.EventHandler(AddressOf Me.Item_OnClick))
Me.ListView1.ContextMenu = cm
End Sub
Protected Sub Item_OnClick(ByVal sender As System.Object, ByVal e As System.EventArgs)
Select Case sender.text
Case "Item 1"
MsgBox("seleccionaste el Item 1")
Case "Item 2"
MsgBox("seleccionaste el Item 2")
Case "Item 3"
MsgBox("seleccionaste el Item 3")
Case "Item 4"
MsgBox("seleccionaste el Item 4")
End Select
End Sub
End Class
Saludos |