欢迎光临
我们一直在努力

易语言 文本_去重复文本_节点法

.版本 2
.支持库 EDataStructure

.子程序 文本_去重复文本_节点法, 文本型, 公开, 去除原文本中重复的文本
.参数 原文本, 文本型
.参数 分割符, 文本型, 可空, 原文本单个内容间的分隔符,例如:---  留空为:逐字分割
.局部变量 局_数组, 文本型, , "0"
.局部变量 局_计次, 整数型
.局部变量 节点, 节点
.局部变量 局_文本, 文本型

.判断开始 (是否为空 (分割符))
    文本_逐字分割 (原文本, 局_数组)
.默认
    局_数组 = 分割文本 (原文本, 分割符, )
.判断结束

.计次循环首 (取数组成员数 (局_数组), 局_计次)
    节点.加入属性 (局_数组 [局_计次], )
.计次循环尾 ()
节点.取全部属性名 (局_数组)
.计次循环首 (取数组成员数 (局_数组), 局_计次)
    局_文本 = 局_文本 + 局_数组 [局_计次] + 分割符
.计次循环尾 ()
局_文本 = 取文本左边 (局_文本, 取文本长度 (局_文本) - 取文本长度 (分割符))
返回 (局_文本)
   

如果文章对你有帮助,欢迎点击上方按钮打赏作者

未经允许不得转载:军哥驿站 » 易语言 文本_去重复文本_节点法

评论 抢沙发

  • 昵称 (必填)
  • 邮箱 (必填)
  • 网址

军哥驿站 建站更专业 更方便

网站开发联系我们