- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 请大神指教 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=188530)
-- 发布时间：2023/9/25 16:12:00
-- 请大神指教
我有这个累加计算，用码编写的，位置写在datacolchanged里面代码如下：
Dim ljcz , dycz As Double
ljcz = e.DataRow("累计产值")
dycz = e.DataRow("当月产值")
If e.DataCol.Name = "当月产值" And e.DataRow.IsNull("累计产值") = True Or e.DataRow("累计产值") = 0 Then
ljcz = dycz
e.DataRow("累计产值") = ljcz
ElseIf e.DataCol.Name = "当月产值" And e.DataRow.IsNull("累计产值") = False Then
Dim sum As Integer = 0
For i As Integer = 0 To 1
ljcz = ljcz + dycz
sum = sum + i
Next
e.DataRow("累计产值") = ljcz - dycz
End If
以上代码结果如下图：
此主题相关图片如下：wspuc-vuxj9.gif
无论怎么修改也无法让当月产值同等的数字进行累加
此主题相关图片如下：2023-09-25_160334.png
而且代码如果没有 e.DataRow("累计产值") = ljcz - dycz其计算结果将会累加两次当月产值的数字。
请大佬指教，谢谢
-- 发布时间：2023/9/25 16:23:00
--
这代码看的稀里糊涂的。截多几行表格数据，然后使用文字说明要做什么功能吧
-- 发布时间：2023/9/25 17:17:00
--
就是想累计计算“当月产值”的数据，将“当月产值”的数据累加到“累计产值”中
此主题相关图片如下：video_2023-09-25_171137.gif
但发现代码无法实现相同值“当月产值”的数据累加
-- 发布时间：2023/9/25 17:32:00
--
请上传实例说明
-- 发布时间：2023/9/25 17:44:00
--
就这个
-- 发布时间：2023/9/25 17:45:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.zip |
-- 发布时间：2023/9/25 20:14:00
--
麻烦举例说明一下，比如填入什么数据，想得到什么结果
-- 发布时间：2023/9/26 11:37:00
--
在“当月产值”字段填入双精度数据，在“累计产值”字段进行累加
-- 发布时间：2023/9/26 11:39:00
--
请举例说明，比如第一行输入什么数据，得到什么结果。第二行输入什么数据，得到什么结果。
-- 发布时间：2023/9/26 11:40:00
--
比如：
第一个月“当月产值”是100，“累计产值”就是100
第二个月“当月产值”是100，“累计产值”就是200
第三个月“当月产值”是100，“累计产值”就是300
以此类推，但是不同月份发生相同产值数据，“累计产值”字段数据不会进行累加，只有不同月的不同产值才会累加