- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]如何把临时表中某格数据填入到另外一张数据表中的指定位置中？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=91442)
-- 发布时间：2016/10/11 9:18:00
-- [求助]如何把临时表中某格数据填入到另外一张数据表中的指定位置中？
如图所示，图一 报关单数量表 是我从基础数据中生成的汇总统计数据（是一张临时表），以报关单量为例，我如何把进出口标志为E的对应的报关单号那格的数据填入到图2中报关单量出口那一格中；如何把进出口标志为I的对应的报关单号那格的数据填入到图2中报关单量进口那一格中。
请老师写一个代码示例，我学习一下。万分感谢。
-- 发布时间：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("报关单号")
Next