以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于全局表的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=18006)
--  作者：冰淇淋小子
--  发布时间：2012/3/30 14:54:00
--  关于全局表的问题
我有5个表，分别是医学普刊，医学核心，社科普刊，社科核心，经管普刊 我在全局表事件的AfterOpenProject事件中添加 Select Case User.Group Case "网络" Tables("医学普刊").Cols.Remove("字符/版") Tables("医学普刊").Cols.Remove("可发周期") Tables("医学普刊").Cols.Remove("发表价格") Tables("医学普刊").Cols.Remove("主要栏目") Case "合作" Tables("医学普刊").Cols.Remove("发表价格") Tables("医学普刊").Cols.Remove("主要栏目") End Select 应该如何撰写了。
--  作者：狐狸爸爸
--  发布时间：2012/3/30 15:12:00
--  

还是设置在AfterOpenProject事件中：

 

Dim nms As String() = {"医学普刊","医学核心","社科普刊","社科核心"}
For Each nm As String In nms
    Select Case User.Group
        Case "网络"
            Tables(nm).Cols.Remove("字符版")
            Tables(nm).Cols.Remove("可发周期")
            Tables(nm).Cols.Remove("发表价格")
            Tables(nm).Cols.Remove("主要栏目")
        Case "合作"
            Tables(nm).Cols.Remove("发表价格")
            Tables(nm).Cols.Remove("主要栏目")
    End Select
Next

[此贴子已经被作者于2012-3-30 15:12:00编辑过]
--  作者：冰淇淋小子
--  发布时间：2012/3/30 15:19:00
--  
另外狐爸，我在医学普刊里面设置的公式，怎么放到全局表中全部失效了。
--  作者：狐狸爸爸
--  发布时间：2012/3/30 15:32:00
--  
以下是引用冰淇淋小子在2012-3-30 15:19:00的发言：
另外狐爸，我在医学普刊里面设置的公式，怎么放到全局表中全部失效了。

 

全局表事件，只有四个默认是生效的，其他要显式设置，参考:

http://www.foxtable.com/help/topics/0671.htm