| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 0值不显示 (http://www.foxtable.com/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 -- 很好，老师，谢谢！ |