VB implementa hacer clic derecho en la vista de árbol para mostrar diferentes submenús
Agregar más menús
Private Sub TreeView1_MouseUp(Botón como entero, Mayús como entero, X como único, Y como único)
Si el botón = 2, entonces
seleccione case treeview1.nodes.key
case ?
PopupMenu edit1
case
PopupMenu edit2
. .
finalizar selección
Fin Sub