主题：[求助]关于“隐藏”的几个问题，求大神帮忙！

这个：BeforeLoadOuterTable

'对非开发者,禁止加载表以下多个表

If e.User.Type <> UserTypeEnum.Developer Then

    Select Case e.DataTableName

        Case "签单项目","订单表","采购订单","产品价格","Users","工资表" 

            e.Cancel = True '那么不允许加载            

    End Select

End If 

同时，保留了之前在 LoadUserSetting 事件中的设置：

 

  —— 因为从开发者切换到非开发者的时候，也需要这样的设置。 

'对非开发者,隐藏多个表

If user.Type <> UserTypeEnum.Developer Then

    Tables("签单项目").Visible = False

    Tables("订单表").Visible = False

    Tables("采购订单").Visible = False

    Tables("产品价格").Visible = False

    Tables("Users").Visible = False

    Tables("工资表").Visible = False

End If

二、问题： 

      自从设置了BeforeLoadOuterTable中的上述代码，就出现了下面这些莫名其妙的问题：

      问题一：FT系统基本上处于半死机状态 

      前天添加上述BeforeLoadOuterTable代码以后，至昨天一整天，FT系统基本上处于半死机状态。
 
      就是点击一个功能（表、单元格、菜单、按钮、……），系统就会死机几分钟，然后能够使用也就十几秒，如此循环往复，以至于昨天一整天基本上什么也做不了。
 
      —— 但是，其它软件工作都正常：Excel、Word、……
 
      原来想可能过一段时间就会好了，却事与愿违。不过也实在想不出这些代码有什么不对的。
 
      今天下班后，实在忍不了了，干脆把 BeforeLoadOuterTable 中的代码都删了。
 
      情况稍好，但也还是经常的半死机状态，操作几下，就要停个一分钟、两分钟的！ 

      大神们有什么好的解决办法吗？ 

      问题二：表标题的位置错乱

       为省事儿和赶进度，在表的左侧用表标题来作为导航。 

      添加上述BeforeLoadOuterTable代码之前，表的顺序位置都正常；添加以后，不论是用开发者、还是用一般用户的身份打开FT，表的位置都经常乱套！

 

      这个也有影响吗？

怎么做实例？

按理说，也不应该啊。

按理说，也不应该啊。

发重了，无法撤回？

嗯 

数据库在远程服务器上，看了一下，数据库还没有复制功能，要怎么发呢？