Access快速开发平台--MultiSelectFor函数产生重复值的解决办法-丘苏洲
Access软件网QQ交流学习群(群号码198465573),欢迎您的加入!
首页 >技术文章> Access开发平台


Access快速开发平台--MultiSelectFor函数产生重复值的解决办法

发表时间:2019/12/29 8:01:25 评论(0) 浏览(3009)  评论 | 加入收藏 | 复制
   
摘 要:Access快速开发平台--MultiSelectFor函数产生重复值的解决办法。
正 文:
Access快速开发平台2.5.1版新增的MultiSelectFor函数为指定文本控件添加多选值很实用。但在特定的情景下比如多选值是句子。句子里有","/";"等常用标点符号和函数本身的分列字符相同就会出现重复选项情况。
例:
请假,家里有事。
病假,感冒了。

strSQL = "Select DISTINCT NOTE from tblLeave"
MultiSelectFor Me.NOTE, strSQL
选项卡里会出现:
请假
家里有事
病假

感冒了


解决办法是用不常用分列字符如:"__"
然后在文本控件的更新事件里打自定义的分列符替换成空格 " "
选项卡里会出现:
请假,家里有事。
病假,感冒了。


事例代码:
Private Sub NOTE_AfterUpdate()
If Not IsNull(Me.NOTE) Then
Me.NOTE = Replace(Me.NOTE, "__", " ")
End If
End Sub

Private Sub NOTEMulti_Click()
    Dim strSQL As String
    strSQL = "Select DISTINCT NOTE from tblLeave"
    MultiSelectFor Me.NOTE, strSQL, "__"
End Sub

提示:
access 升迁到SQL SERVER 备注类型变成 ntext类型。
SQL SERVER ntext类型不支持 DISTINCT。
把 access备注类型改成合适长度的文本类型即可。

Access软件网交流QQ群(群号:198465573)
 
 相关文章
[access查询][示例]删除重复数据并只保留一条\如何用acc...  【Grant  2008/10/25】
从access中的表中删除重复记录  【  2009/8/17】
[access查询]【access入门】删除重复数据并不保留重复项...  【麥田  2012/12/25】
【Access示例】字段值重复颜色突出显示/反色显示重复值  【缪炜  2015/1/18】
【Access删除两列重复值示例】删除两列重复数据并保留一条,将两...  【麥田  2015/5/7】
【Access彻底删除两列重复值示例】删除两列重复数据并不保留重复...  【麥田  2015/5/9】
一句话解答联合查询怎么排除重复值思路问题  【麥田  2018/1/25】
常见问答
技术分类
相关资源
文章搜索
关于作者

丘苏洲

文章分类

文章存档

友情链接