主题：右键菜单都在哪些事件上中写？

你可以使用窗口快捷菜单，如

 

http://www.foxtable.com/webhelp/scr/3116.htm

 

 

同时，我测试使用下面代码也可以弹出菜单

 

ContextMenus("打印").Show(e.Sender,e.x,e.y)

请上传具体实例测试，窗口菜单、系统快捷菜单，我测试都没问题。

1、打开，右键，可以弹出菜单（你的用户菜单要打开，如果切换到系统菜单打不开是正常的）

 

2、如果用窗口菜单，参考

 

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:制作饼状图.table

 

我测试点击菜单后，菜单会消失的啊。

 

请做一个例子发上来测试，说明你要做什么效果。

e.strip.Visible = False
Select Case e.StripItem.Name
    Case "项目1"
        Dim Chart  As WinForm.Chart
        Chart= Forms("窗口1").Controls("Chart1")
        Chart.Print(True, True)
    Case "Save"
        '保存代码
    Case "New"
        '新建代码
    Case  "Print"
        '打印代码
    Case "Exit"
        '退出代码
End Select

认认真真看 ShowContextStrip

 

http://www.foxtable.com/webhelp/scr/3116.htm