以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 0值不显示 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=143298) |
-- 作者:15666282205 -- 发布时间:2019/11/20 13:32:00 -- 0值不显示 老师,表有200列,其中好多是显示的0,如何让所有的0都不显示呢? |
-- 作者:有点蓝 -- 发布时间:2019/11/20 13:41:00 -- 录入的时候就不要录入0值了。如果是导入或者通过代码赋值的,判断一下0值就不要赋值了。 等有值再处理很麻烦的, 方法1、遍历所有单元格把0值改为nothing 2、到drawcell事件,把0值隐藏
|
-- 作者:15666282205 -- 发布时间:2019/11/20 14:02:00 -- 老师,是用代码从另一个表复制的数据,判断是0值不赋值不会写代码;drawcell事件不合适,因为一列中有的是0,有的不是0;只有遍历单元格把0改为nothing合适,我查了帮助和论坛,没找到例子。还得请您帮忙。 |
-- 作者:有点蓝 -- 发布时间:2019/11/20 14:11:00 -- For Each dr1 As DataRow In DataTables("表A").datarows For Each dc As DataCol In DataTables("表A").DataCols If dc.IsNumeric AndAlso dr1(dc.Name) = 0 Then dr1(dc.Name) = dr1(dc.name) Next Next 或者 For Each dc As DataCol In DataTables("表A").DataCols If dc.IsNumeric Then DataTables("表A").ReplaceFor(dc.Name,Nothing, dc.Name & " = 0") End If Next |
-- 作者:15666282205 -- 发布时间:2019/11/20 14:34:00 -- 很好,老师,谢谢! |