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

目的：克隆一份新的数据，包含子表的所有行，原始数据保持不变

父表的名称是唯一的，即禁止重复

用下面的代码生成新的父表数据，原父表将无数据，其所有子表数据将关联到新父表中，即：""& str &"_复件" 中，请求帮助：

Dim str As String = Tables("订单").Current("名称")

Tables("订单").Current.Clone()

Tables("订单).Current("名称") = ""& str &"_复件"

Dim drs As List(Of DataRow)

drs = Tables("订单").Current.DataRow.GetChildRows("订单明细")

For Each dr As DataRow In drs

dr.Clone

主题：[求助]父表&子表 一起克隆