编辑框删除重复

momoxiaofei

想根据整行里   通过手机号码判断重复  删除整行内容

咋写啊  积分不多 麻烦老师给写一下

tellmesy

  

子程序名	返回值类型	公开	备 注
子程序1

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

文本 ＝ 编辑框1.内容
文本_取中间_批量 (文本, “手机号：”, “--密码”, 文本数组, , , , , , , )
计次循环首 (取数组成员数 (文本数组), i)
如果真 (数组_取次数 (文本数组, 文本数组 [i]) ＞ 1)
文本 ＝ 文本_删除指定文本行 (文本, i)

计次循环尾 ()
编辑框1.内容 ＝ 文本

.版本 2<br /> <br /> .子程序 子程序1<br /> .局部变量 文本数组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 文本, 文本型<br /> .局部变量 文本1, 文本型<br /> <br /> <br /> 文本 ＝ 编辑框1.内容<br /> 文本_取中间_批量 (文本, “手机号：”, “--密码”, 文本数组, , , , , , , )<br /> .计次循环首 (取数组成员数 (文本数组), i)<br />     .如果真 (数组_取次数 (文本数组, 文本数组 <i>) ＞ 1)<br />         文本 ＝ 文本_删除指定文本行 (文本, i)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 编辑框1.内容 ＝ 文本

tellmesy

  

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

文本 ＝ 编辑框1.内容
调试输出 (文本)
文本_取中间_批量 (文本, “手机号：”, “--密码”, 文本数组, , , , , , , )
调试输出 (文本数组)
计次循环首 (取数组成员数 (文本数组), i)
调试输出 (数组_取次数 (文本数组, 文本数组 [i]))
如果真 (数组_取次数 (文本数组, 文本数组 [i]) ＞ 1)
文本 ＝ 文本_删除指定文本行 (文本, i)

计次循环尾 ()
编辑框1.内容 ＝ 文本

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 文本数组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 文本, 文本型<br /> .局部变量 文本1, 文本型<br /> <br /> <br /> 文本 ＝ 编辑框1.内容<br /> 调试输出 (文本)<br /> 文本_取中间_批量 (文本, “手机号：”, “--密码”, 文本数组, , , , , , , )<br /> 调试输出 (文本数组)<br /> .计次循环首 (取数组成员数 (文本数组), i)<br />     调试输出 (数组_取次数 (文本数组, 文本数组 <i>))<br />     .如果真 (数组_取次数 (文本数组, 文本数组 <i>) ＞ 1)<br />         文本 ＝ 文本_删除指定文本行 (文本, i)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 编辑框1.内容 ＝ 文本

67449123

删除重复项.e (847.09 KB, 下载次数: 15)

2020-5-22 10:02 上传

点击文件名下载附件