[求助]如何把临时表中某格数据填入到另外一张数据表中的指定位置中？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]如何把临时表中某格数据填入到另外一张数据表中的指定位置中？

共有2259人关注过本帖树形打印复制链接主题：[求助]如何把临时表中某格数据填入到另外一张数据表中的指定位置中？

ufo20085

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

等级：幼狐帖子：196 积分：2919 威望：0 精华：0 注册：2016/8/31 14:05:00

[求助]如何把临时表中某格数据填入到另外一张数据表中的指定位置中？ 发帖心情

Post By：2016/10/11 9:18:00 [只看该作者]

如图所示，图一报关单数量表是我从基础数据中生成的汇总统计数据（是一张临时表），以报关单量为例，我如何把进出口标志为E的对应的报关单号那格的数据填入到图2中报关单量出口那一格中；如何把进出口标志为I的对应的报关单号那格的数据填入到图2中报关单量进口那一格中。

请老师写一个代码示例，我学习一下。万分感谢。

有点蓝

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

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

Post By：2016/10/11 9:36:00 [只看该作者]

Tables("报关单数量").Sort = "申请口岸,标志"

Dim dr As DataRow

Dim r As Row

Dim r2 As Row

For i As Integer = 0 To Tables("报关单数量").Rows.Count - 1 Step 2

r = Tables("报关单数量").Rows(i)

r2 = Tables("报关单数量").Rows(i+1)

dr = DataTables("统计").AddNew

dr("申请口岸") = r("申请口岸")

dr("报关单量_出口") = r("报关单号")

dr("报关单量_进口") = r2("报关单号")

主题：[求助]如何把临时表中某格数据填入到另外一张数据表中的指定位置中？