[求助]统计 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]统计

共有2705人关注过本帖树形打印复制链接主题：[求助]统计

风声

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：五尾狐帖子：1018 积分：6800 威望：0 精华：0 注册：2014/2/12 20:14:00

[求助]统计 发帖心情

Post By：2023/10/26 19:02:00 [只看该作者]

老师，下面代码只统计到9月份

If e.DataCol.Name = "项目ID" OrElse e.DataCol.Name = "项目" Then

For i As Integer = 1 To 12

Dim Filter As String = e.DataRow("项目") & "_ID = '" & e.DataRow("项目ID") & "' and 月=" & i

e.DataRow("M" & i) = DataTables("数据汇总").Compute("Sum(" & e.DataRow("项目") & "_应付)", Filter)

End If

If e.DataCol.Name Like "*房_ID" Then

Dim pr As DataRow

pr = DataTables("水电气统计").Find("项目 = '" & e.DataCol.Name.split("_")(0) & "' and 项目ID='" & e.newvalue & "'")

If pr IsNot Nothing Then

DataTables("水电气统计").DataCols("项目ID").RaiseDataColChanged(pr)

End If

Else If e.DataCol.Name Like "*房_应付" Then

Dim pr As DataRow

pr = DataTables("水电气统计").Find("项目 = '" & e.DataCol.Name.split("_")(0) & "' and 项目ID='" & e.DataRow(e.DataCol.Name.split("_")(0) & "_ID") & "'")

If pr IsNot Nothing Then

DataTables("水电气统计").DataCols("项目ID").RaiseDataColChanged(pr)

End If

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110738 积分：563610 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2023/10/26 20:07:00 [只看该作者]

应该是没有其它月份的数据，调试看看

If e.DataCol.Name = "项目ID" OrElse e.DataCol.Name = "项目" Then

For i As Integer = 1 To 12

Dim Filter As String = e.DataRow("项目") & "_ID = '" & e.DataRow("项目ID") & "' and 月=" & i

dim d as double = DataTables("数据汇总").Compute("Sum(" & e.DataRow("项目") & "_应付)", Filter)

msgbox("条件=" & Filter & “, 查询结果=” & d)

e.DataRow("M" & i) = d

End If

江南小镇

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：七尾狐帖子：1765 积分：11811 威望：0 精华：0 注册：2015/6/22 8:11:00

Post By：2023/10/27 14:22:00 [只看该作者]

老师，下面的统计表超过10月份就不能统计了，另外保存时报错。

下载信息 [文件大小：下载次数： ]
点击浏览该文件:统计.zip

有点蓝

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110738 积分：563610 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2023/10/27 15:21:00 [只看该作者]

月份改为整数列，不要使用字符列

下一主题 >> << 上一主题

主题：[求助]统计