最简单的办法:
随便在哪张表里的两个单元格里,输入两行文字:系统菜单,用户菜单。
在这张表里的Click事件中,输入如下代码:
Select Case e.Table.Text Case "系统菜单" Syscmd.Project.OpenSystemMenu() Case "用户菜单" Syscmd.Project.OpenUserMenu()End Select
放在菜单里的话,一回到系统菜单,就不能直接回到用户菜单了。