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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 有条件的去统计另一张表的数据并填充（已解决）

共有2953人关注过本帖树形打印复制链接主题：有条件的去统计另一张表的数据并填充（已解决）

ericotaku

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

加好友

发短信

等级：幼狐帖子：163 积分：1373 威望：0 精华：0 注册：2014/6/10 8:47:00

有条件的去统计另一张表的数据并填充（已解决） 发帖心情

Post By：2016/7/3 12:57:00 [只看该作者]

{表一}，[数量]这一列

我想统计{表二}中，相应分类并且，[条件]="条件一"和"条件二"，的个数

请老师帮忙完善一下，

DataTables("表二").Compute("Count([名称])", "所属分类 = 'e.名称' And 条件='条件一'or'条件二'")

并请告知代码应该放在哪里。。。

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目20（按条件统计并填入单元格）.foxdb

[此贴子已经被作者于2016/7/6 18:27:41编辑过]

y2287958

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

加好友

发短信

等级：狐神帖子：4841 积分：35105 威望：0 精华：0 注册：2008/8/31 22:44:00

Post By：2016/7/3 15:41:00 [只看该作者]

用分组统计即可，我更喜欢用SQLGroupTableBuilder。

Dim bm As String = "统计表1"

Dim b As New SQLGroupTableBuilder(bm,"表二")

b.Groups.AddDef("所属分类")

b.Totals.AddExp("数量","1")

b.Filter = "条件 in('条件一','条件二')"

b.Build

MainTable = Tables(bm)

（在命令窗口执行）

ericotaku

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

加好友

发短信

等级：幼狐帖子：163 积分：1373 威望：0 精华：0 注册：2014/6/10 8:47:00

Post By：2016/7/3 22:18:00 [只看该作者]

我不想重新生成一个表，可以直接填到原来的表里面吗？

y2287958

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

加好友

发短信

等级：狐神帖子：4841 积分：35105 威望：0 精华：0 注册：2008/8/31 22:44:00

Post By：2016/7/3 22:21:00 [只看该作者]

用filler填充

大红袍

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

加好友

发短信

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

Post By：2016/7/3 22:49:00 [只看该作者]

参考代码

Dim dt1 As DataTable = DataTables("表一")
Dim dt2 As DataTable = DataTables("表二")

For Each dr As DataRow In dt1.DataRows
dr("数量") = dt2.Compute("Count(名称)", "所属分类 = '" & dr("名称") & "' And 条件 in('条件一','条件二')")
Next

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

主题：有条件的去统计另一张表的数据并填充（已解决）