- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 求教代码 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=13503)
-- 发布时间：2011/10/14 14:10:00
-- 求教代码
求教“隐藏空值的例”的代码。
-- 发布时间：2011/10/14 14:34:00
--
不明白为何会有这样的要求？
-- 发布时间：2011/10/14 14:45:00
-- 是这样的
是这样的狐狸爸爸。我是要打印表。作为账单传给客户的。空值太多看起来不清楚。手工筛选又太麻烦，也容易搞错
[此贴子已经被作者于2011-10-14 14:47:07编辑过]
-- 发布时间：2011/10/14 14:49:00
-- 打印的是查询表
打印的是查询表
-- 发布时间：2011/10/14 14:49:00
--
用视图：
http://www.foxtable.com/help/topics/0191.htm
-- 发布时间：2011/10/14 14:58:00
-- 这个我知道的。
狐狸爸爸这个我知道的。我是要动态的。因为每个客户的收费项目都不一样。同一个客户不同的订单收费项目也不一样
-- 发布时间：2011/10/14 15:06:00
--
这需要具体情况具体分析，做个简单的表传上来，说明需要怎样排除行。
-- 发布时间：2011/10/14 15:26:00
-- 狐狸爸爸请您看看
如项目。筛选客户“1”后。安窗口按钮需要隐藏空值的例。
如项目。筛选订单号“001”后。安窗口按钮需要隐藏空值的例。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
-- 发布时间：2011/10/14 15:40:00
--
For Each c As col In Tables("表A").cols
Dim filter As String = c.name & " Is not Null"
If Tables("表A").Filter > "" Then
filter = filter & " And " & Tables("表A").Filter
End If
If DataTables("表A").Find( filter) IsNot Nothing Then
c.Visible = True
Else
c.Visible = False
End If
Next
-- 发布时间：2011/10/14 15:44:00
-- 谢谢狐狸爸爸
狐狸爸爸您好强啊。