以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]清除零值 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=113572) |
-- 作者:江南小镇 -- 发布时间:2018/1/18 16:30:00 -- [求助]清除零值 老师,年度统计列的数据会在清零时把数据也清理了。 Dim dr As DataRow = e.DataRow Select Case e.DataCol.Name Case "M1","M2","M3","M4","M5","M6","M7","M8","M9","M10","M11","M12" If dr.IsNull("M1") OrElse dr.IsNull("M2") OrElse dr.IsNull("M3") OrElse dr.IsNull("M4") OrElse dr.IsNull("M5") OrElse dr.IsNull("M6") OrElse dr.IsNull("M7") OrElse dr.IsNull("M8") OrElse dr.IsNull("M9") OrElse dr.IsNull("M10") OrElse dr.IsNull("M11") OrElse dr.IsNull("M12") Then dr("年度合计") = Nothing Else dr("年度合计") = dr("M1") + dr("M2") + dr("M3") + dr("M4") + dr("M5") + dr("M6") + dr("M7") + dr("M8") + dr("M9") + dr("M10") + dr("M11") + dr("M12") End If End Select
|
-- 作者:有点甜 -- 发布时间:2018/1/18 17:46:00 -- 这个意思?
Dim dr As DataRow = e.DataRow |