以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]批量隐藏列  (http://foxtable.net/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