Foxtable(狐表)用户栏目专家坐堂 → [求助]如何判断列值为空,然后隐藏该列?


  共有1918人关注过本帖树形打印复制链接

主题:[求助]如何判断列值为空,然后隐藏该列?

帅哥哟,离线,有人找我吗?
fengwenliuyan
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:902 积分:8258 威望:0 精华:0 注册:2012/10/19 13:55:00
[求助]如何判断列值为空,然后隐藏该列?  发帖心情 Post By:2017/2/12 8:17:00 [只看该作者]

表“A”有4列:“客户”、“筐”、“铁”、“架”,
如何判断每个客户的“筐”、“铁”、“架”3列的值是否为空,如果为空值,则隐藏该列?
If Tables("A").Rows.IsNull("筐") = True Then
Tables("A").Visible = False
End If
If Tables("A").Rows.IsNull("铁") = True Then
Tables("A").Visible = False
End If
If Tables("A").Rows.IsNull("架") = True Then
Tables("A").Visible = False
End If
但是提示错误说“isnull”不是“rowcollection”??

 回到顶部
帅哥哟,离线,有人找我吗?
fengwenliuyan
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:902 积分:8258 威望:0 精华:0 注册:2012/10/19 13:55:00
不能沉啊?  发帖心情 Post By:2017/2/12 9:22:00 [只看该作者]

不能沉啊?
自己顶!

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/2/12 9:37:00 [只看该作者]

Dim cs() As String = {"客户", "筐", "铁", "架"}
For Each c As String In cs
    Dim idx As Integer = Tables("A").FindRow(c & " is not null")
    If idx >= 0 Then
        Tables("A").cols(c).Visible = True
    Else
        Tables("A").cols(c).Visible = False
    End If
Next

 回到顶部