主题：关联表记录的复制！

主表A表与B表相关联

在A表中复制一条记录，如何同时复制B表相关联的行，使新增加的行与B表中新增加的行仍然关联，谢谢！

不太明白你的意思，在A表复制一行到何处？到B表？

A表COPY A表中任何一行记录,都会存在关联列的呀,则B表仍会关联.

复制一行记录以后，相关联的行也要复制啊~！

应该是这样的意思：再建C表（主表）和D表并关联，复制A表（主表）到C表，自动复制B表到D表。

不是再解释一下，  就是在A表中克隆一条记录，同时关联的B表中相关联的行也要克隆，代码如何？

for
next
参考删除关联行帮助

关联行不好克隆吧？ 因为父表没有输入关联列的内容的时候，子表不能增加行的。

比如订单，若希望克隆其中一张订单，并把它的明细也克隆出来，不知如何实现？

能做到同时隆子表数据吗？

可以写一小段代码，大概就是：


Dim r1 As Row = Tables("父表").Current
Dim r2 As Row=  r1.Clone
For Each r3 As DataRow = r1.DataRow.GetChildRows("子表")
    Dim  r4 As Row = Tables("子表").AddNew  
    For c As Col In Tables("子表").Cols
        r4(c.Name) = r3(c.Name)
    Next
    r4("子表关联列") = r2("父表关联列")
Next