以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于数据填充  (http://foxtable.net/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