电脑
易语言
拖动一个按钮组件和一个编辑框组件到易语言主界面当中
设置好编辑框组件的属性，允许多行为真，滚动条设置为纵向
双击按钮组件，进入到程序集窗口，准备编写代码
在子程序中创建四个变量，具体如图所示
接下来写入如下代码到子程序当中：.版本 2 文本_数组 ＝ 分割文本 (编辑框1.内容, #换行符, ).计次循环首 (取数组成员数 (文本_数组), i) .变量循环首 (取数组成员数 (文本_数组), i ＋ 1, -1, p) .如果真 (文本_数组 [i] ＝ 文本_数组 [p]) 删除成员 (文本_数组, p, ) .如果真结束 .变量循环尾 () .计次循环尾 ().计次循环首 (取数组成员数 (文本_数组), i) 文本 ＝ 文本 ＋ 文本_数组 [i] ＋ #换行符.计次循环尾 ()编辑框1.内容 ＝ 文本
点击最上方的黑色三角按钮进行调试，在编辑框中输入一些字符进去
点击按钮，发现重复的数据被去除了，实现了数组的去重复功能
整体代码总结：.版本 2 .局部变量 文本_数组, 文本型, , '0'.局部变量 i, 整数型.局部变量 p, 整数型.局部变量 文本, 文本型 文本_数组 ＝ 分割文本 (编辑框1.内容, #换行符, ).计次循环首 (取数组成员数 (文本_数组), i) .变量循环首 (取数组成员数 (文本_数组), i ＋ 1, -1, p) .如果真 (文本_数组 [i] ＝ 文本_数组 [p]) 删除成员 (文本_数组, p, ) .如果真结束 .变量循环尾 () .计次循环尾 ().计次循环首 (取数组成员数 (文本_数组), i) 文本 ＝ 文本 ＋ 文本_数组 [i] ＋ #换行符.计次循环尾 ()编辑框1.内容 ＝ 文本