以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  统计问题分类  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=193721)

--  作者：lgz518 --  发布时间：2024/10/8 9:18:00 --  统计问题分类 如何实现将表A的数据按类别，品名，规格，数量汇总到表B? 说明：表A大类是其各小类总和 表B大类是表A大类的总和，表B小类是表A小类的总和。 此主题相关图片如下：分类统计.png

--  作者：有点蓝 --  发布时间：2024/10/8 10:22:00 --   Dim Arys As List(Of String()) Arys = DataTables("表A").GetValues("类别|品名|规格") For Each Ary As String() In Arys    dim dr as datarow = DataTables("表B").find("类别=\'" & Ary(0) & "\' and 品名=\'" & Ary(1) & "\' and 规格=\'" & Ary(2) & "\'") if dr isnot nothing dr("数量") = DataTables("表A").Compute("类别=\'" & Ary(0) & "\' and 品名=\'" & Ary(1) & "\' and 规格=\'" & Ary(2) & "\'") end if Next

--  作者：lgz518 --  发布时间：2024/10/8 14:40:00 --   代码放在表B,报错找不到"类别

--  作者：有点蓝 --  发布时间：2024/10/8 14:41:00 --   没有这个列名

--  作者：有点蓝 --  发布时间：2024/10/8 14:43:00 --   这种代码只能放到按钮里

--  作者：lgz518 --  发布时间：2024/10/8 15:14:00 --   报错：无法计算。表达式“System.Data.NameNode”不是聚合。

--  作者：有点蓝 --  发布时间：2024/10/8 15:30:00 --   dr("数量") = DataTables("表A").Compute("sum(数量)","类别=\'" & Ary(0) & "\' and 品名=\'" & Ary(1) & "\' and 规格=\'" & Ary(2) & "\'")

--  作者：lgz518 --  发布时间：2024/10/8 15:56:00 --   Dim Arys As List(Of String()) Arys = DataTables("表AA").GetValues("类别|品名|规格") For Each Ary As String() In Arys    Dim dr As DataRow = DataTables("表BB").find("类别=\'" & Ary(0) & "\' and 品名=\'" & Ary(1) & "\' and 规格=\'" & Ary(2) & "\'")     If dr("类别") = \'大类\' AndAlso dr("品名") IsNot Nothing Then dr("数量") = DataTables("表AA").Compute("sum(数量)", "类别=\'" & Ary(0) & "\' and 品名=\'" & Ary(1) & "\'") End If If dr IsNot Nothing Then dr("数量") = DataTables("表AA").Compute("sum(数量)", "类别=\'" & Ary(0) & "\' and 品名=\'" & Ary(1) & "\' and 规格=\'" & Ary(2) & "\'") End If Next 执行大类没统计，加上红代码也不行，如何解决？

--  作者：有点蓝 --  发布时间：2024/10/8 16:10:00 --   请上传实例说明