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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 条件统计

共有2219人关注过本帖树形打印复制链接主题：条件统计

武汉老杨

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

加好友

发短信

等级：婴狐帖子：56 积分：605 威望：0 精华：0 注册：2016/7/21 12:54:00

条件统计

Post By：2016/8/23 17:44:00 [只看该作者]

统计表中有“单位名称”、“年度”、“月份” 、“后备_进货”（进货金额）四个列，如图：

订单表中有“采购单位”、“采购时间”、“系列”、“金额”。

在统计表中输入 “单位名称”、“年度”、“月份” 能从订单表中找出该单位、该月份的 “后备”系列的采购总金额，填入统计表的“后备_进货”。

请帮忙给我代码，外部数据源的！

不胜感谢！

此主题相关图片如下：22.png

此主题相关图片如下：11.png

狐狸爸爸

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

加好友

发短信

等级：管理员帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2016/8/23 18:04:00 [只看该作者]

建议直接上传项目文件，这么多表，这么多列，要准确回复的你的问题，还得花费大量的时间去建表去输入测试数据。

外部数据源的话，可以新建一个项目，导入这几个表，然后再上传就行了。

你节省一分钟的时间，却会让想帮你的人多花10几分钟。

不想做例子的话，参考：

http://www.foxtable.com/webhelp/scr/0681.htm

http://www.foxtable.com/webhelp/scr/2394.htm

[此贴子已经被作者于2016/8/23 18:04:21编辑过]

武汉老杨

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

加好友

发短信

等级：婴狐帖子：56 积分：605 威望：0 精华：0 注册：2016/7/21 12:54:00

条件统计

Post By：2016/8/23 20:53:00 [只看该作者]

上传例子，麻烦帮看一下。我这边用的

下载信息 [文件大小：下载次数： ]
点击浏览该文件:测试.rar

是外部数据源

大红袍

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

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/8/23 21:46:00 [只看该作者]

DataColChanged事件

Select Case e.DataCol.name
    Case "单位名称", "年度", "月份"
        If e.DataRow.IsNull("单位名称") = False AndAlso e.DataRow.IsNull("年度") = False AndAlso e.DataRow.IsNull("月份") = False Then
            Dim d As Date = new Date(e.DataRow("年度"), e.DataRow("月份"), 1)
            Dim filter As String = "采购单位 = '" & e.DataRow("单位名称") & "' and 采购日期 >= #" & d & "# and 采购日期 < #" & d.AddMonths(1) & "#"
            e.DataRow("后备_进货") = DataTables("采购单明细").Compute("sum(数量)", filter)
        Else
            e.DataRow("后备_进货") = Nothing
        End If
End Select

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

主题：条件统计