- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 代码问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=123038)
-- 发布时间：2018/8/7 9:00:00
-- 代码问题
此主题相关图片如下：捕获.jpg
Dim dr As DataRow = e.DataRow
Select Case e.DataCol.Name
Case "cpmc","th","tz","dts","dz","zz","xls","ttz","dtz"
If dr.IsNull("cpmc") OrElse dr.IsNull("th") Then \'如果产品名称或图号为空
dr("dz") = "合计" \'产品名称或图号第一个为空的单重列=合计
Else
dr("tz") = dr("dts") * dr("dz") \'套重=单套数量*单重
dr("zz") = dr("xls") * dr("dz") \'总重=下料数量*单重
dr("ttz") = dr("dts") * dr("tdz")\'图单重=单套数量*图单重
End If
End Select
代码出现题 不知道原因在哪里？ 请专家给指点指点
谢谢
-- 发布时间：2018/8/7 9:06:00
--
1、代码没问题
2、dz列如果是数值列，不能赋值字符串【合计】
-- 发布时间：2018/8/7 10:18:00
-- 后续问题
这段代码 我是想实现 套重 总重 图套重 汇总合计功能
判断出现合计的行 是产品名称列或者图号列 的第一个空值出现厚 材质裂 显示“合计”
产品名称列或者图号列 的第一个空值出现 这一行的 套重 总重 图套重单元格自动对列求和结果
Dim dr As DataRow = e.DataRow
Select Case e.DataCol.Name
Case "cpmc","th","tz","dts","cz","zz","xls","ttz","dtz"
If dr.IsNull("cpmc") OrElse dr.IsNull("th") Then \'如果产品名称或图号为空
dr("cz") = "合计" \'产品名称或图号第一个为空的单重列=合计
Else
dr("tz") = dr("dts") * dr("dz") \'套重=单套数量*单重
dr("zz") = dr("xls") * dr("dz") \'总重=下料数量*单重
dr("ttz") = dr("dts") * dr("tdz")\'图单重=单套数量*图单重
End If
End Select
这段代码 出现 “合计” 是单元格 输入数据后 才能出现
怎么对 产品名称列或者图号列 的第一个空值出现 这一行的 套重 总重 图套重单元格自动对列求和结果？？？？？
此主题相关图片如下：捕获.jpg
此主题相关图片如下：捕获.jpg-- 发布时间：2018/8/7 10:28:00
-- 后续
我感觉这个表应该是 打开表 第一行就出现合计 第一行名称或图号输入内容 第二行出现合计 依次类推 直到最后名称或图号列不在输入内容
这样做的目的 就是让 合计行跟随 表格 中间没有空行
-- 发布时间：2018/8/7 10:55:00
--
你是想【合计行】一直显示？
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=121115&skin=0