主题：关联表填充问题

http://www.foxtable.net/help/index.html?n=1533.htm

 

 

这个不是我 想要的答案  

 

情况是这样的  关联表里 是有数据的  但是现在我有新的数据需要填充到关联表中  条件是先要删除关联表中原有的数据   

 

清楚关联表所以行的 代码 我调不出来

 

filler（） 这个函数   又用不到关联表    纠结啊

老朱  你说的 我全调试了  都不行  遍历 只能删除第一行  后面的去不了

刚刚回短信想贴给你，但是不通过。
 
可以的：
 
 
For Each r1 As DataRow In DataTables("表A").Select("[金额] > 100")
    Dim r2 As Row = Tables("关联表").AddNew()
    For Each dc As DataCol in DataTables("表A").DataCols
        r2(dc.Name) = r1(dc.name)
      Next
Next

 

至于删除关联表的数据，我想不用我说了。

老爹 你上面那段代码 我现在就在用     我就差删除关联表的数据了   肯能 最近 通宵过多  用脑过度吧   脑子转不过来   看来 需要补充一下睡眠了 

假定需要清除关联表“表A.表B”的数据：

 

If Tables("表A").Current IsNot Nothing Then

     DataTables("表B").RemoveFor("关联列 = " & Tables("表A").Current(“关联列")）

End If

DataTables("表名").datarows.clear

呵呵   谢谢老爹   不过 我突发灵感 改变了设计思路   不需这 玩意了   操作更犀利了    哈哈  俺太有才了

DataTables("表B").deleteFor("关联列 = " & Tables("表A").Current(“关联列")） 这个也行

老朱 关联表  不能用 DataTables("表名").datarows.clear

 

只能用  Tables("表名")