专家坐堂-求助：一个表有数值型字段如果值都是空值或为零值，那么该字段隐藏，代码如何写？Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求助：一个表有数值型字段如果值都是空值或为零值，那么该字段隐藏，代码如何写？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=83222)

--  作者：jswjyjf
--  发布时间：2016/4/4 9:03:00
--  求助：一个表有数值型字段如果值都是空值或为零值，那么该字段隐藏，代码如何写？
求助：一个表有数值型字段如果值都是空值或为零值，那么该字段隐藏，代码如何写？

--  作者：大红袍
--  发布时间：2016/4/5 1:01:00
--
Dim t As Table = Tables("表A")
For Each c As Col In t.cols
    Dim idx As Integer = t.FindRow(c.name & " is not null")
    If idx = -1 Then
        c.visible = False
    Else
        c.visible = True
    End If
Next