以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]打开窗体后将数据为空的列全部隐藏  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=77293)

--  作者:xianzheng
--  发布时间:2015/11/15 15:55:00
--  [求助]打开窗体后将数据为空的列全部隐藏
[求助]打开窗体后将数据为空值的列全部隐藏,代码如何写?
--  作者:大红袍
--  发布时间:2015/11/15 16:01:00
--  
For Each c As Col In Tables("表A").cols
    If  Tables("表A").FindRow(c.name & " is not null") < 0 Then
        c.visible = False
    End If
Next