请问一下，我在右键快捷菜单的popup事件中这样写的目的是为了让这个截图功能在不同的表右键后能够相应的隐藏，为什么这样写会无效的呢，求解

代码如下：

If CurrentTable.Name="荣e享财务系统推送" Then ContextMenus("test").Items("截图上传1").Visible=False ContextMenus("test").Items("截图上传1.1").Visible=False ContextMenus("test").Items("截图上传3").Visible=False ContextMenus("test").Items("截图上传3.1").Visible=False ContextMenus("test").Items("截图上传3.2").Visible=False ContextMenus("test").Items("截图上传3.3").Visible=False ContextMenus("test").Items("截图上传3.4").Visible=False ContextMenus("test").Items("截图上传4").Visible=False ContextMenus("test").Items("截图上传5").Visible=False ContextMenus("test").Items("截图上传6.1").Visible=False ContextMenus("test").Items("截图上传8").Visible=False ContextMenus("test").Items("截图上传8.1").Visible=False ContextMenus("test").Items("截图上传8.2").Visible=False End If If CurrentTable.Name="平台合伙人订单数据" Then ContextMenus("test").Items("截图上传3").Visible=False ContextMenus("test").Items("截图上传3.1").Visible=False ContextMenus("test").Items("截图上传3.2").Visible=False ContextMenus("test").Items("截图上传3.3").Visible=False ContextMenus("test").Items("截图上传3.4").Visible=False ContextMenus("test").Items("截图上传4").Visible=False ContextMenus("test").Items("截图上传5").Visible=False ContextMenus("test").Items("截图上传6").Visible=False ContextMenus("test").Items("截图上传6.1").Visible=False ContextMenus("test").Items("截图上传8").Visible=False ContextMenus("test").Items("截图上传8.1").Visible=False ContextMenus("test").Items("截图上传8.2").Visible=False End If If CurrentTable.Name="保证金" Then ContextMenus("test").Items("截图上传1").Visible=False ContextMenus("test").Items("截图上传1.1").Visible=False ContextMenus("test").Items("截图上传4").Visible=False ContextMenus("test").Items("截图上传5").Visible=False ContextMenus("test").Items("截图上传6").Visible=False ContextMenus("test").Items("截图上传6.1").Visible=False ContextMenus("test").Items("截图上传8").Visible=False ContextMenus("test").Items("截图上传8.1").Visible=False ContextMenus("test").Items("截图上传8.2").Visible=False End If If CurrentTable.Name="费用报销单2" Then ContextMenus("test").Items("截图上传1").Visible=False ContextMenus("test").Items("截图上传1.1").Visible=False ContextMenus("test").Items("截图上传3").Visible=False ContextMenus("test").Items("截图上传3.1").Visible=False ContextMenus("test").Items("截图上传3.2").Visible=False ContextMenus("test").Items("截图上传3.3").Visible=False ContextMenus("test").Items("截图上传3.4").Visible=False ContextMenus("test").Items("截图上传4").Visible=False ContextMenus("test").Items("截图上传6").Visible=False ContextMenus("test").Items("截图上传6.1").Visible=False ContextMenus("test").Items("截图上传8").Visible=False ContextMenus("test").Items("截图上传8.1").Visible=False ContextMenus("test").Items("截图上传8.2").Visible=False End If If CurrentTable.Name="荣e享财务系统推送3" Then ContextMenus("test").Items("截图上传1").Visible=False ContextMenus("test").Items("截图上传1.1").Visible=False ContextMenus("test").Items("截图上传3").Visible=False ContextMenus("test").Items("截图上传3.1").Visible=False ContextMenus("test").Items("截图上传3.2").Visible=False ContextMenus("test").Items("截图上传3.3").Visible=False ContextMenus("test").Items("截图上传3.4").Visible=False ContextMenus("test").Items("截图上传4").Visible=False ContextMenus("test").Items("截图上传5").Visible=False ContextMenus("test").Items("截图上传6").Visible=False ContextMenus("test").Items("截图上传8").Visible=False ContextMenus("test").Items("截图上传8.1").Visible=False ContextMenus("test").Items("截图上传8.2").Visible=False End If If CurrentTable.Name="外访费系统设计" Then ContextMenus("test").Items("截图上传1").Visible=False ContextMenus("test").Items("截图上传1.1").Visible=False ContextMenus("test").Items("截图上传3").Visible=False ContextMenus("test").Items("截图上传3.1").Visible=False ContextMenus("test").Items("截图上传3.2").Visible=False ContextMenus("test").Items("截图上传3.3").Visible=False ContextMenus("test").Items("截图上传3.4").Visible=False ContextMenus("test").Items("截图上传4").Visible=False ContextMenus("test").Items("截图上传5").Visible=False ContextMenus("test").Items("截图上传6").Visible=False ContextMenus("test").Items("截图上传6.1").Visible=False End If If CurrentTable.Name="现金支出凭单" Then ContextMenus("test").Items("截图上传1").Visible=False ContextMenus("test").Items("截图上传1.1").Visible=False ContextMenus("test").Items("截图上传3").Visible=False ContextMenus("test").Items("截图上传3.1").Visible=False ContextMenus("test").Items("截图上传3.2").Visible=False ContextMenus("test").Items("截图上传3.3").Visible=False ContextMenus("test").Items("截图上传3.4").Visible=False ContextMenus("test").Items("截图上传5").Visible=False ContextMenus("test").Items("截图上传6").Visible=False ContextMenus("test").Items("截图上传6.1").Visible=False ContextMenus("test").Items("截图上传8").Visible=False ContextMenus("test").Items("截图上传8.1").Visible=False ContextMenus("test").Items("截图上传8.2").Visible=False End If

此主题相关图片如下：qq截图20180328084700.png

主题：请问一下，我在右键快捷菜单的popup事件中这样写的目的是为了让这个截图功能在不同的表右键后能够相应的隐藏，为什么这样写会无效的呢，求解