| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- filler为什么不能排除重复值 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=73297) |
| -- 作者：JPG7 -- 发布时间：2015/8/16 10:57:00 -- filler为什么不能排除重复值 Dim f As New Filler f.SourceTable = DataTables("产品信息") \'指定数据来源 f.SourceCols = "型号,规格,尺寸,木线色" \'指定数据来源列 f.DataTable = DataTables("成品库") \'指定数据接收表 f.DataCols = "型号,规格,尺寸,木线色" \'指定数据接收列 f.Distinct = True f.Fill() \'填充数据 If DataTables("成品库").HasChanges Then MessageBox.Show("导入成功") Else MessageBox.Show("没有导入任何信息") End If DataTables("成品库").Save
|
| -- 作者：有点蓝 -- 发布时间：2015/8/16 11:09:00 -- 这个Distinct指的是所有指定列中的内容都一样的排除 |
| -- 作者：JPG7 -- 发布时间：2015/8/16 11:19:00 -- 回复：（有点蓝）这个Distinct指的是所有指定列中的内... 对啊，就是列出的列，我现在点按钮，可以无限次填充 |
| -- 作者：大红袍 -- 发布时间：2015/8/16 11:23:00 -- 如果不想重复填充，设置此属性
ExcludeExistValue |
| -- 作者：有点蓝 -- 发布时间：2015/8/16 11:24:00 -- f.ExcludeExistValue = True 加上这个吧，要和distinct组合才行，具体为啥这样设置我也说不清 |
| -- 作者：有点蓝 -- 发布时间：2015/8/16 11:25:00 -- 我的理解是Distinct针对的是源数据表 而excludeexitvalue针对的是接受数据表
|