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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 主表与子表

共有1761人关注过本帖树形打印复制链接主题：主表与子表

dnq217

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

等级：婴狐帖子：19 积分：266 威望：0 精华：0 注册：2015/8/25 20:36:00

主表与子表

Post By：2016/3/19 9:58:00 [只看该作者]

各位大神，我想做一个采购系统，其中有这样一个功能：

采购主表中有一列<审批状态>，要求动态显示，效果是这样的：

（审批列在子表中）

当子表中的请购项全部通过审批后，此列显示“全部审批”

当子表中的请购项只有一部分被审批，此列显示“部分审批”

当子表中的请购项一个都没有通过审批，此列显示：“未审批”

请各位大神帮忙，这个怎么实现。万分感激。

新手菜鸟表示看帮助好头痛

Hyphen

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

等级：狐神帖子：5015 积分：25363 威望：0 精华：0 注册：2015/8/18 9:21:00

Post By：2016/3/19 10:28:00 [只看该作者]

类似

If e.Col.Name = "审批状态" Then '如果是分组行的数量列

Dim countsub = DataTables("子表").Compute("Count(*)","关联列 = '" & e.Row("关联列") & "' and 审批='通过'")

If countsub = 0 Then

e.Text = "未审批"

Else

If e.Row.DataRow.GetChildRows("子表").Count = countsub Then

e.Text = "全部审批"

Else

e.Text = "部分审批"

End If

主题：主表与子表