以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 代码为何不执行 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=121512) |
-- 作者:wuchangke4 -- 发布时间:2018/7/8 7:47:00 -- 代码为何不执行 If e.DataCol.name = "Lwg32" Or e.DataCol.name = "Lwg12" Then e.DataRow("Lwg32") = e.DataRow("LwgC32") + e.DataRow("LwgT32") e.DataRow("Lwg12") = e.DataRow("LwgC12") + e.DataRow("LwgT12") End If |
-- 作者:y2287958 -- 发布时间:2018/7/8 7:52:00 -- 代码没问题 |
-- 作者:wuchangke4 -- 发布时间:2018/7/8 8:26:00 -- 为何不执行呢 |
-- 作者:y2287958 -- 发布时间:2018/7/8 9:07:00 -- 具体问题及分析 |
-- 作者:有点甜 -- 发布时间:2018/7/9 9:46:00 -- 改成
Select Case e.DataCol.Name
Case "LwgC32", "LwgT32", "LwgC12", "LwgT12"
e.DataRow("Lwg32") = e.DataRow("LwgC32") + e.DataRow("LwgT32")
e.DataRow("Lwg12") = e.DataRow("LwgC12") + e.DataRow("LwgT12")
End Select
|