主题：快捷菜单分别设置

上传了事例文件

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

点击浏览该文件:快捷菜单测试.zip

目的是：

表A：菜单项目147可用，其它不可用
表B：菜单项目256可用，其它不可用
表C：菜单项目369可用，其它不可用

表A的单击事件：

Dim sit As WinForm.StripItem                   
Select Case sit.Name
    Case "项目1","项目4","项目7"
        sit.Enabled = True
    Case "项目2","项目3","项目57","项目6","项目8","项目9"
        sit.Enabled = False
End Select

上面的代码有问题，那么是要将菜单一、二、三的子项目独立分开设置，还是统一可以设置？代码怎么写？

 我上传的文件中， 我已经给按钮绑定了快捷菜单，变为左键单击了，

我的目的是表A操作时，快捷菜单1的项目1可用，快捷菜单2的项目4可用，快捷菜单3的项目7可用（这个点击按钮菜单1、2 、3 可以看到项目1、2、3、4、5、6、7、8、9）

表B，表C以此类推