主题：某表从多少表中取值

老师麻烦帮解决一下 谢谢 问题：A表 B表 C表 D表 四个表中只有一列（编码），并且编码不重复，现在要实现的功能是D表的编码是从A B C表的编码中自动提取。即A表有编码1、2，B表有编码a、b,C表有编码A、B，则D表编码就是1,2，a,b,A,B，并且A表或B表或C表有更新，则D表也将自动更新。再次感谢！

 参考

 

Dim ts As String() = {"表A", "表B", "表C"}
for each t as string in ts
    Dim f As New Filler
    f.SourceTable = DataTables(t)
    f.SourceCols = "编号" '指定数据来源列
    f.DataTable = DataTables("表D") '指定数据接收表
    f.DataCols = "编号" '指定数据接收列
    f.ExcludeExistValue = True
    f.Fill() '填充数据
Next

谢谢 大红袍老师 真是秒回啊

大红袍老师  你这段代码应该写在什么地方

 

尽量写到一个按钮里面去吧。

好的 谢啦

大红袍老师  f.Fill() '填充数据 里面填什么呢  谢谢

 

什么也不用填。

不行啊 没有提示错误 D表的“通俗名称”列里面也没有数据。

是有数据 但在D表的811行才有 1-810没有数据 是空的