删除重复数组内容

悬念

易语言里粘贴即可');" value="　复制代码　" class="pn pnc"/>  

子程序名	返回值类型	公开	备 注
_按钮2_被单击

变量名	类 型	静态	数组	备 注
i	整数型
文本数组	文本型		0

编辑框1.内容 ＝ “”
文本数组 ＝ { “1”, “2”, “3”, “2” }
数组去重复 (文本数组)  ' 主要代码
计次循环首 (取数组成员数 (文本数组), i)
编辑框1.加入文本 (文本数组 [i] ＋ #换行符 )
计次循环尾 ()

子程序名	返回值类型	公开	备 注
数组去重复
参数名	类 型	参考	可空	数组	备 注
文本数组	文本型	√		√

变量名	类 型	静态	数组	备 注
节点	节点
返_文本数组	文本型		0
i	整数型

计次循环首 (取数组成员数 (文本数组), i)
如果真 (节点.加入属性 (文本数组 [i], 真))
加入成员 (返_文本数组, 文本数组 [i])

计次循环尾 ()
文本数组 ＝ 返_文本数组

i支持库列表	支持库注释
EDataStructure	数据结构支持库

.版本 2<br /> .支持库 EDataStructure<br /> <br /> .子程序 _按钮2_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 文本数组, 文本型, , "0"<br /> <br /> 编辑框1.内容 ＝ “”<br /> 文本数组 ＝ { “1”, “2”, “3”, “2” }<br /> <br /> 数组去重复 (文本数组)  ' 主要代码<br /> <br /> .计次循环首 (取数组成员数 (文本数组), i)<br />     编辑框1.加入文本 (文本数组 <i> ＋ #换行符)<br /> .计次循环尾 ()<br /> <br /> .子程序 数组去重复<br /> .参数 文本数组, 文本型, 参考 数组<br /> .局部变量 节点, 节点<br /> .局部变量 返_文本数组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> <br /> .计次循环首 (取数组成员数 (文本数组), i)<br />     .如果真 (节点.加入属性 (文本数组 <i>, 真))<br />         加入成员 (返_文本数组, 文本数组 <i>)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 文本数组 ＝ 返_文本数组

  

计次循环首 (取数组成员数 (数组2), i)
如果真 (取数组成员数 (数组2) ＜ i)
跳出循环 ()
变量循环首 (取数组成员数 (数组2), i ＋ 1, -1, i2)
如果真 (数组2 [i] ＝ 数组2 [i2])
删除成员 (数组2, i2, )

变量循环尾 ()
计次循环尾 ()

.版本 2<br /> <br /> .计次循环首 (取数组成员数 (数组2), i)<br /> <br />     .如果真 (取数组成员数 (数组2) ＜ i)<br />         跳出循环 ()<br />     .如果真结束<br />     .变量循环首 (取数组成员数 (数组2), i ＋ 1, -1, i2)<br /> <br />         .如果真 (数组2 <i> ＝ 数组2 [i2])<br />             删除成员 (数组2, i2, )<br />         .如果真结束<br /> <br /> <br />     .变量循环尾 ()<br /> <br /> <br /> <br /> .计次循环尾 ()

联系我时，请说是在 挂海论坛 上看到的，谢谢！

zhuiyi110

淡定一下吧，不要太鸡冻呵，要淡定！