以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  关于数据填充  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=150827)
--  作者：ygg8310
--  发布时间：2020/6/8 19:28:00
--  关于数据填充
数据填充如何控制流程？例如我想实现这个功能，数据填充》先填充产品为PD01的，然后PD02。。。
[此贴子已经被作者于2020/6/8 19:28:59编辑过]
--  作者：有点蓝
--  发布时间：2020/6/8 20:28:00
--  
参考：http://www.foxtable.com/webhelp/topics/1533.htm

比如：
for each s as string in DataTables("表A").getvalues("产品")
For Each dr1 As DataRow In DataTables("表A").Select("产品=\'" & s & "\'")
    Dim dr2 As DataRow = DataTables("表B").AddNew()
    For Each dc As DataCol in DataTables("表A").DataCols
        dr2(dc.Name) = dr1(dc.name)
    Next
Next
next