函数 取重(数据 为 文本型) 为 文本型
数据 = 删首尾空(数据)
变量 结果 为 文本型 = ""
数据 = 排序(数据,真)
变量 总长度 为 整数型 = 取文本长度(数据)
变量 计次 为 整数型 = 0
判断循环首 总长度 > 0
变量 当前 为 文本型 = 取文本左边(数据,计次 + 1)
当前 = 取文本右边(当前,1)
如果 寻找文本(数据,当前,计次 + 1) > -1 则
结果 = 结果 & 当前
结束 如果
数据 = 子文本替换(数据,当前,"")
总长度 = 取文本长度(数据)
判断循环尾
取重 = 结果
结束 函数
3,408 Views