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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 跨表取数

共有3180人关注过本帖树形打印复制链接主题：跨表取数

nbsugu_z

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

等级：一尾狐帖子：410 积分：3676 威望：0 精华：0 注册：2017/4/8 8:59:00

跨表取数

Post By：2021/10/14 15:36:00 [只看该作者]

A表只有一行，列名：工程量

B表多行有：编号列和工程量进度列

现在要求A表的工程量单元格从 B表以编号为条件取工程量进度的数据到A表。但是A表没编号列的。要如何写代码

有点蓝

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

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

Post By：2021/10/14 15:50:00 [只看该作者]

以编号为条件 -- 什么用的条件？

A表永远只有一行？

nbsugu_z

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

等级：一尾狐帖子：410 积分：3676 威望：0 精华：0 注册：2017/4/8 8:59:00

Post By：2021/10/14 18:44:00 [只看该作者]

是的，A表永远是一行，我是作为动态更新的。比如查找到B表中某行编号为1234的这行，然后将工程进度量列的数据填充到A表工程量单元格。注意，B表编号肯定有的，且固定的字符

有点蓝

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

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

Post By：2021/10/14 20:42:00 [只看该作者]

Dim dr As DataRow
dr = DataTables("B表").Find("编号='1234'")
If dr IsNot Nothing Then '如果找到的话
Tables("B表").rows(0)("工程量") = dr("工程进度量")

End If

nbsugu_z

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

等级：一尾狐帖子：410 积分：3676 威望：0 精华：0 注册：2017/4/8 8:59:00

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

我真笨，写成e.datarow(“工程量”）=…….了，谢老师

主题：跨表取数