右键弹出菜单

'form1的MouseDown事件
If e.button=Windows.Forms.MouseButtons.Right then
 Cnm_menu1.show(e.X,e.Y)
END IF
'Cnm_menu1为ContextMenu