| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 请教：Filler的Distinct问题！ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=186475) |
| -- 作者：y2287958 -- 发布时间：2023/5/6 9:10:00 -- 请教：Filler的Distinct问题！ 请问以下代码中“数据填充器.Distinct ”设置为何无效？（请忽略我为什么要这么用代码，谢谢！） \'1、生成一个临时表 Dim 显示表名 As String = "表A_1" Dim 临时表生成器 As New DataTableBuilder(显示表名) 临时表生成器.Build() \'2、加载指定表数据 Dim sql语句 As String = "S elect * FROM {表A}" DataTables(显示表名).Fill(sql语句, True) \'3、复制相同表数据到当前表 Dim 数据填充器 As New Filler 数据填充器.SourceTable = DataTables("表A") \'指定数据来源 数据填充器.DataTable = DataTables(显示表名) \'指定数据接收表 数据填充器.Distinct = True \'注意：这里不起作用，不管设置为True或False，结果都是不排除重复内容。 数据填充器.Fill() \'填充数据 MainTable = Tables(显示表名)
|
| -- 作者：有点蓝 -- 发布时间：2023/5/6 9:24:00 -- 可能理解有问题。 Distinct 是用来排除数据来源表的重复值，比如表A有2行完全一样的内容，只导入其中一行 如果要排除数据接收表"表A_1"已经有的内容，应该使用ExcludeExistValue |
| -- 作者：y2287958 -- 发布时间：2023/5/6 9:39:00 -- 明白了，谢谢！ |