易语言文本查重复函数

问：易语言里怎么取连续重复的数字？

1. 答：我写了一个查重文本，包含数字文本字母等晚上贴源码给你
2. 答：你这问的很绕，如果你就想输出固定格式：12211121，就是比如：
   调试输出("12211121")
   何必那么费劲
3. 答：.版本 2
   .支持库 RegEx
   .支持库 spec
   .子程序 __启动窗口_创建完毕
   .局部变量 正则, 正则表达式
   .局部变量 搜索, 搜索结果, , "0"
   .局部变量 i, 整数型
   正则.创建 (“(\d)(\1+)?”, )
   搜索 ＝ 正则.搜索全部 (“12211121”)
   .计次循环首 (取数组成员数 (搜索), i)
   调试输出 (取文本长度 (搜索 [i].取匹配文本 (“12211121”, )))
   .计次循环尾 ()
   正则表达式
4. 答：循环嵌套，按顺序提字符，再与后面的对比计次就好。不会写的话，追我
5. 答：逐字取出，在计次循环输然就可以了。
6. 答：弄一个数组，置随机数种子，计次循环，然后定义两个变量，这里用m，n来说，m＝取随机数，如果真(m!=n )手机打不了不等于！ 加入成员(数组,m) m＝n 计次循环尾
7. 答：.版本 2
   .子程序 统计, 文本型
   .参数 参数字符串, 文本型
   .局部变量 字符1, 文本型
   .局部变量 计数, 整数型
   .局部变量 结果, 文本型
   .判断循环首 (参数字符串 ≠ “”)
   字符1 ＝ 取文本左边 (参数字符串, 1)
   参数字符串 ＝ 取文本右边 (参数字符串, 取文本长度 (参数字符串) － 1)
   .如果 (字符1 ＝ 取文本左边 (参数字符串, 1))
   计数 ＝ 计数 ＋ 1
   .否则
   .如果 (结果 ＝ “”)
   结果 ＝ “1”
   .否则
   结果 ＝ 结果 ＋ “，” ＋ 到文本 (计数)
   .如果结束
   计数 ＝ 1
   .如果结束
   .判断循环尾 ()
   返回 (结果)

问：易语言怎么取重复文本

1. 答：给你写个 这个容易！
2. 答：你的意识是这么只要123456 和86512 重复的不要？

问：易语言中如何查询编辑框中内容是否与数据库中内容重复

1. 答：首先，需要确定你的数据库是什么 MYSQL 还是EDB还是ACCESS之类的
   其次，将编辑框.内容读取出来，去和数据库中包含这个内容的字段进行比较
   例如：如果是edb数据库，编辑框中是一个名字，你要和数据库中的名字字段进行比较，你可以这样
   打开（xxx.edb）
   如果真（查询（读（“名字”）=编辑框.内容））
   调试输出（“有重复”）
   否则 调试输出（“无重复”）
   纯手打 没进易语言 可能略有小错误 谅解
   大体思路是这样的 你可以参考参考
2. 答：如果是sql的话，就用sql查询命令，查询结果与编辑框对比
3. 答：取数据库内容 判断 编辑框.内容=数据库内容

问：易语言数据库如何删除完全重复记录和部分关键字段重复记录

1. 答：有个简单的思路，可能显得笨拙了，高手不要见笑：
   1、生成一个三个字段合并的“字段A”，内容=用户+号码+单位，然后以“字段A”排序，逐行判断删除重复，逐行处理完毕后刷新显示；
   2、类似，按号码排序，逐行判断重复，如果重复。。。。
   3、没试过，只是觉得要是按照号码排序了以后，空的应该都挨着了。

问：易语言高级表格循环查找相同部分

1. 答：.版本 2
   .支持库 eGrid
   .子程序 _按钮1_被单击
   .局部变量 n, 整数型
   .局部变量 m, 整数型
   .局部变量 a, 文本型
   .计次循环首 (_启动窗口.高级表格1.行数 － 1, n)
   a ＝ _启动窗口.高级表格1.取数据 (n, 1)
   .如果真 (a ＝ “嘻嘻嘻嘻”)
   m ＝ m ＋ 1
   高级表格1.插入行 (, )
   高级表格1.置数据 (m, 1, 1, a)
   高级表格1.置数据 (m, 2, 1, _启动窗口.高级表格1.取数据 (n, 2))
   .如果真结束
   .计次循环尾 ()