- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 零值取消显示问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=99993)
-- 发布时间：2017/5/2 15:21:00
-- 零值取消显示问题
此主题相关图片如下：qq截图20170502151258.png
图中，未预付列是由收款合计减预付合计，用代码计算而得，代码如下：
Dim dr1 As DataRow = e.DataRow
Select Case e.DataCol.Name
Case "收款合计","预付合计","入库合计","发票合计","返款合计"
dr1("未预付") = val(dr1("收款合计")) - val(dr1("预付合计"))
dr1("未入库") = val(dr1("预付合计")) - val(dr1("入库合计"))
dr1("未收发票") = val(dr1("入库合计")) - val(dr1("发票合计"))
dr1("未返款") = val(dr1("收款合计")) - val(dr1("返款合计"))
End Select
我想实现，如果未预付为零时，则不显示，可以实现吗，请各位老师帮忙。
-- 发布时间：2017/5/2 16:21:00
--
请老师帮忙呀。
-- 发布时间：2017/5/2 16:25:00
--
Dim dr1 As DataRow = e.DataRow
Select Case e.DataCol.Name
Case "收款合计","预付合计","入库合计","发票合计","返款合计"
If val(dr1("收款合计")) - val(dr1("预付合计")) = 0 Then
dr1("未预付") = Nothing
Else
dr1("未预付") = val(dr1("收款合计")) - val(dr1("预付合计"))
End If
dr1("未入库") = val(dr1("预付合计")) - val(dr1("入库合计"))
dr1("未收发票") = val(dr1("入库合计")) - val(dr1("发票合计"))
dr1("未返款") = val(dr1("收款合计")) - val(dr1("返款合计"))
End Select
-- 发布时间：2017/5/2 16:58:00
--
谢谢有点色老师的帮忙。