以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  多行生成  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=171410)

--  作者：shqpldczj --  发布时间：2021/8/28 23:43:00 --  多行生成 a表有三行记录，点击生成按钮，b表生成同样的三行数据请教怎么操作，我自己完成的只能生成一行

--  作者：shqpldczj --  发布时间：2021/8/29 0:37:00 --           For Each dr1 As DataRow In DataTables("报价单子表").Select("序号 = \'" & Tables("报价单").Current("序号") & " \'")             Dim dr2 As DataRow = DataTables("合同子表").AddNew()             For Each dc As DataCol In DataTables("报价单子表").DataCols                 dr2(dc.Name) = dr1(dc.name)             Next         Next 参照论坛里的帖子完成了