以文本方式查看主题 -  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=157299)

--  作者：atiwhl5 --  发布时间：2020/10/11 18:00:00 --  [求助]多表提取数据填充 Dim A As New Filler DataTables("C").DataRows.Clear() \'清除原有数据 A.SourceTable = DataTables("A") A.SourceCols = "项目编号" A.DataTable = DataTables("C") A.DataCols = "项目编号" a.ExcludeExistValue = True A.Fill() a = New Filler DataTables("C").DataRows.Clear() \'清除原有数据 A.SourceTable = DataTables("B") A.SourceCols = "项目编号" A.DataTable = DataTables("C") A.DataCols = "项目编号" a.ExcludeExistValue = True A.Fill() 这段代码为什么只填充了B表，而没有A表的 [此贴子已经被作者于2020/10/11 19:10:45编辑过]

--  作者：foxyuan --  发布时间：2020/10/11 20:04:00 --   DataTables("表C").DataRows.Clear() \'清除原有数据  第二条要去掉，把之前的清空了

--  作者：atiwhl5 --  发布时间：2020/10/11 22:10:00 --   试过，一样

--  作者：有点蓝 --  发布时间：2020/10/11 22:38:00 --   试过什么代码？贴出来

--  作者：atiwhl5 --  发布时间：2020/10/12 8:34:00 --   试过2楼说的，代码在一楼

--  作者：有点蓝 --  发布时间：2020/10/12 8:44:00 --   没有改啊 Dim A As New Filler DataTables("C").DataRows.Clear() \'清除原有数据 A.SourceTable = DataTables("A") A.SourceCols = "项目编号" A.DataTable = DataTables("C") A.DataCols = "项目编号" a.ExcludeExistValue = True A.Fill() a = New Filler \'\'\'\'\'\'DataTables("C").DataRows.Clear() \'这一句代码去掉，不然会把刚刚填充的数据清空了 A.SourceTable = DataTables("B") A.SourceCols = "项目编号" A.DataTable = DataTables("C") A.DataCols = "项目编号" a.ExcludeExistValue = True A.Fill()

--  作者：atiwhl5 --  发布时间：2020/10/12 19:41:00 --   谢谢！那句我删掉了，原因是我测试的时候改了数据，我忘了没有符合条件的，所有没有