以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]批量隐藏列  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=70672)

--  作者:新航程小何
--  发布时间:2015/6/26 10:23:00
--  [求助]批量隐藏列
各位老师,请问怎样通过在下面代码写一代码,能够在加载表的时候隐藏两张表共同的列“制单人”。
Dim tbs1() As String = {"物料归还记录", "物料领取记录" }
For Each tb1 As String In tbs1
    Dim q As new OuterTableBuilder
    q.TableName = tb1
    q.TableCaption = tb1
    q.C
    q.SelectString = "Select top 10 * F rom {" & tb1 & "}"
    q.Build
Next

--  作者:大红袍
--  发布时间:2015/6/26 10:25:00
--  

q.Build

If Tables(tb1).Cols.Contains("制单人") Then

    Tables(tb1).Cols("制单人").Visible = False

End If