以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  代码问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=7801)
--  作者：wqc360
--  发布时间：2010/8/7 1:10:00
--  代码问题

Vars("SysUpdatePrintInfo") = True
With RibbonTabs("数据库")("查询信息")("列名")
    .Items.Clear \'清除原有项目
    For Each c As Col In CurrentTable.Cols \'遍历当前表中的列
        \'定义一个标准按钮,按钮的名称等于列名称.
        Dim b As New RibbonMenu.Button(c.Name)
        b.Text = c.Name \'按钮的标题也等于列名称
        .Items.Add(b)
    Next
End With

 

请问以上代码红色部分怎样改写实现隐藏列不做候选值（不是移除列）。谢谢
--  作者：czy
--  发布时间：2010/8/7 13:19:00
--  
Vars("SysUpdatePrintInfo") = True
With RibbonTabs("数据库")("查询信息")("列名")
    .Items.Clear \'清除原有项目
    For Each c As Col In CurrentTable.Cols \'遍历当前表中的列
        If c.Visible Then
            \'定义一个标准按钮,按钮的名称等于列名称.
            Dim b As New RibbonMenu.Button(c.Name)
            b.Text = c.Name \'按钮的标题也等于列名称
            .Items.Add(b)
        End If
    Next
End With
--  作者：wqc360
--  发布时间：2010/8/7 18:54:00
--  
谢谢C版
--  作者：铜豌豆之首
--  发布时间：2017/3/31 22:02:00
--  
Vars("SysUpdatePrintInfo") = True老师这段是什么意思？帮助里也差不多，全变量也不对哦
--  作者：有点蓝
--  发布时间：2017/3/31 22:37:00
--  
以下是引用铜豌豆之首在2017/3/31 22:02:00的发言：
Vars("SysUpdatePrintInfo") = True老师这段是什么意思？帮助里也差不多，全变量也不对哦

http://www.foxtable.com/webhelp/scr/0325.htm
--  作者：铜豌豆之首
--  发布时间：2017/3/31 22:51:00
--  
老师意思还是个全局变量，我现在在看系统菜单模板，但是我一直没有找到在哪里定义的，无论是预先还是动态都没找到，导致很多代码无法理解
--  作者：有点蓝
--  发布时间：2017/3/31 23:00:00
--  
请仔细看5楼的帮助，仔细看，看完。已经说明很明白了。