姓名电话地址分割，文本分割问题

又来一个新手

我想些一个快速黏贴的功能，例如给一个信息， 小王13854411444陕西省西安市未央区碧桂园B栋502   这样的一条信息直接复制到编辑框内，让他按照姓名，电话，地址 显示到下面对应的编辑框，
我自己尝试用取文本，但是有的信息有空格，有的有,号，没有固定规律 有什么好办法吗？能让他自动识别，大神们请赐教~感谢感谢

afu45

新建 易程序.e (957.12 KB, 下载次数: 0)

昨天 22:08 上传

点击文件名下载附件

  

变量名	类 型	静态	数组	备 注
表达式	正则表达式类
i	整数型
txt	文本型

txt ＝ 编辑框1.内容
表达式.创建 (“\d{11}”, txt, 假, 假, 真, 真)
编辑框3.内容 ＝ 表达式.取匹配文本 (1, )
txt ＝ 表达式.替换 (“---”)
表达式.创建 (“[\u4e00-\u9fa5]+(省|市)[\u4e00-\u9fa5\w]+”, txt, 假, 假, 真, 真)
编辑框4.内容 ＝ 表达式.取匹配文本 (1, )
txt ＝ 表达式.替换 (“---”)
表达式.创建 (“[\u4e00-\u9fa5]{2,3}”, txt, 假, 假, 真, 真)
编辑框2.内容 ＝ 表达式.取匹配文本 (1, )

.版本 2<br /> <br /> .局部变量 表达式, 正则表达式类<br /> .局部变量 i, 整数型<br /> .局部变量 txt, 文本型<br /> <br /> txt ＝ 编辑框1.内容<br /> 表达式.创建 (“\d{11}”, txt, 假, 假, 真, 真)<br /> 编辑框3.内容 ＝ 表达式.取匹配文本 (1, )<br /> txt ＝ 表达式.替换 (“---”)<br /> 表达式.创建 (“[\u4e00-\u9fa5]+(省|市)[\u4e00-\u9fa5\w]+”, txt, 假, 假, 真, 真)<br /> 编辑框4.内容 ＝ 表达式.取匹配文本 (1, )<br /> txt ＝ 表达式.替换 (“---”)<br /> 表达式.创建 (“[\u4e00-\u9fa5]{2,3}”, txt, 假, 假, 真, 真)<br /> 编辑框2.内容 ＝ 表达式.取匹配文本 (1, )

519948746

无规律的地址信息最好是调用AI     你举例的这个姓名+电话+地址的还算比较标准清晰的   如果是姓名和地址直接连在一起的   光靠程序的死代码是判断不了哪个是姓名哪个是地址的

cunanhai

正则.e (957.16 KB, 下载次数: 0)

昨天 22:46 上传

点击文件名下载附件

补充内容 (2025-7-5 22:50):
如果因为有空格取不到的话 表达式改成([^\d]+)(\d{11})([\s\S]+) 试试

冰蓝茉莉

曾经写过类似的需求, 代码我就不找了一两年前的代码, 如果你懂调用api的技术的话我说下你就会了.  
用高德api, 申请高德开发者 个人资质就行了 . 里面有个api 传入模糊信息. 高德会返回格式化好的地址信息.

或者你抓包一些快递官网的接口 基本都有的. 他们发快递都支持传入模糊地址

尛龍科技

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
原始文本	文本型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

编辑框_原始.内容 ＝ “”
编辑框_姓名.内容 ＝ “”
编辑框_电话.内容 ＝ “”
编辑框_地址.内容 ＝ “”
按钮_解析.禁止 ＝ 真

子程序名	返回值类型	公开	备 注
_编辑框_原始_内容被改变

按钮_解析.禁止 ＝ 取文本长度 (编辑框_原始.内容) ＝ 0

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

原始文本 ＝ 编辑框_原始.内容
如果真 (原始文本 ＝ “”)
信息框 (“请先粘贴信息!”, 0, , )
返回 ()
解析信息 ()

子程序名	返回值类型	公开	备 注
解析信息

变量名	类 型	静态	数组	备 注
姓名结束位置	整数型
电话开始位置	整数型
i	整数型
电话文本	文本型

计次循环首 (取文本长度 (原始文本), i)
如果真 (是否数字 (取文本中间 (原始文本, i, 1)))
姓名结束位置 ＝ i － 1
电话开始位置 ＝ i
跳出循环 ()

计次循环尾 ()
如果真 (姓名结束位置 ≤ 0)
编辑框_姓名.内容 ＝ “未找到姓名”
编辑框_电话.内容 ＝ “”
编辑框_地址.内容 ＝ “”
返回 ()

编辑框_姓名.内容 ＝ 取文本左边 (原始文本, 姓名结束位置)
电话文本 ＝ 取文本中间 (原始文本, 电话开始位置, 11)
如果真 (取文本长度 (电话文本) ≠ 11)
编辑框_电话.内容 ＝ “电话格式错误”
编辑框_地址.内容 ＝ “”
返回 ()

计次循环首 (11, i)
如果真 (是否数字 (取文本中间 (电话文本, i, 1)) ＝ 假)
编辑框_电话.内容 ＝ “电话格式错误”
编辑框_地址.内容 ＝ “”
返回 ()

计次循环尾 ()
编辑框_电话.内容 ＝ 电话文本
如果真 (电话开始位置 ＋ 11 ≤ 取文本长度 (原始文本))
编辑框_地址.内容 ＝ 取文本右边 (原始文本, 取文本长度 (原始文本) ��� (电话开始位置 ＋ 11) ＋ 1)
编辑框_地址.内容 ＝ “”

编辑框_地址.内容 ＝ 取文本右边 (原始文本, 取文本长度 (原始文本) ��� (电话开始位置 ＋ 11) ＋ 1)

子程序名	返回值类型	公开	备 注
是否数字	逻辑型
参数名	类 型	参考	可空	数组	备 注
字符	文本型

如果真 (取代码 (字符, ) ≥ 取代码 (“0”, ) 且 取代码 (字符, ) ≤ 取代码 (“9”, ))
返回 (真)
返回 (假)

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 原始文本, 文本型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 编辑框_原始.内容 ＝ “”<br /> 编辑框_姓名.内容 ＝ “”<br /> 编辑框_电话.内容 ＝ “”<br /> 编辑框_地址.内容 ＝ “”<br /> 按钮_解析.禁止 ＝ 真<br /> <br /> .子程序 _编辑框_原始_内容被改变<br /> <br /> 按钮_解析.禁止 ＝ 取文本长度 (编辑框_原始.内容) ＝ 0<br /> <br /> .子程序 _按钮_解析_被单击<br /> <br /> 原始文本 ＝ 编辑框_原始.内容<br /> .如果真 (原始文本 ＝ “”)<br />     信息框 (“请先粘贴信息!”, 0, , )<br />     返回 ()<br /> .如果真结束<br /> 解析信息 ()<br /> <br /> .子程序 解析信息<br /> .局部变量 姓名结束位置, 整数型<br /> .局部变量 电话开始位置, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 电话文本, 文本型<br /> <br /> .计次循环首 (取文本长度 (原始文本), i)<br />     .如果真 (是否数字 (取文本中间 (原始文本, i, 1)))<br />         姓名结束位置 ＝ i － 1<br />         电话开始位置 ＝ i<br />         跳出循环 ()<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> .如果真 (姓名结束位置 ≤ 0)<br />     编辑框_姓名.内容 ＝ “未找到姓名”<br />     编辑框_电话.内容 ＝ “”<br />     编辑框_地址.内容 ＝ “”<br />     返回 ()<br /> .如果真结束<br /> <br /> 编辑框_姓名.内容 ＝ 取文本左边 (原始文本, 姓名结束位置)<br /> 电话文本 ＝ 取文本中间 (原始文本, 电话开始位置, 11)<br /> .如果真 (取文本长度 (电话文本) ≠ 11)<br />     编辑框_电话.内容 ＝ “电话格式错误”<br />     编辑框_地址.内容 ＝ “”<br />     返回 ()<br /> .如果真结束<br /> <br /> .计次循环首 (11, i)<br />     .如果真 (是否数字 (取文本中间 (电话文本, i, 1)) ＝ 假)<br />         编辑框_电话.内容 ＝ “电话格式错误”<br />         编辑框_地址.内容 ＝ “”<br />         返回 ()<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 编辑框_电话.内容 ＝ 电话文本<br /> .如果真 (电话开始位置 ＋ 11 ≤ 取文本长度 (原始文本))<br />     编辑框_地址.内容 ＝ 取文本右边 (原始文本, 取文本长度 (原始文本) － (电话开始位置 ＋ 11) ＋ 1)<br />     编辑框_地址.内容 ＝ “”<br /> .如果真结束<br /> <br /> 编辑框_地址.内容 ＝ 取文本右边 (原始文本, 取文本长度 (原始文本) － (电话开始位置 ＋ 11) ＋ 1)<br /> <br /> <br /> .子程序 是否数字, 逻辑型<br /> .参数 字符, 文本型<br /> <br /> .如果真 (取代码 (字符, ) ≥ 取代码 (“0”, ) 且 取代码 (字符, ) ≤ 取代码 (“9”, ))<br />     返回 (真)<br /> .如果真结束<br /> 返回 (假)

这样就是完美达标你的需求

hongqingfeng

  

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

变量名	类 型	静态	数组	备 注
文本	文本型
文本1	文本型
tel	文本型
名字	文本型

文本 ＝ 删全部空 (编码_UTF8到Ansi (读入文件 (取特定目录 (3) ＋ “\1.txt”)))
判断 (寻找文本 (文本, “省”, , 假) ≠ -1)
文本1 ＝ 取文本右边 (文本_取左边 (文本, “省”, , ), 4) ＋ “省” ＋ 文本_取右边 (文本, “省”, , )
tel ＝ 文本_取数字 (文本)
名字 ＝ 取文本左边 (文本, 取文本长度 (文本) ��� (取文本长度 (文本1) ＋ 取文本长度 (tel)))
调试输出 (文本1, tel, 名字)

子程序名	返回值类型	公开	备 注
文本_取数字	文本型
参数名	类 型	参考	可空	数组	备 注
文本	文本型

变量名	类 型	静态	数组	备 注
雨	正则表达式类
i	整数型

雨.创建 (“[0-9]+\d”, 文本, , , , )
计次循环首 (雨.取匹配数量 (), i)
判断 (取文本长度 (雨.取匹配文本 (i, 1)) ＝ 11)
返回 (雨.取匹配文本 (i, 1))



计次循环尾 ()
返回 (“”)

i支持库列表	支持库注释
shell	操作系统界面功能支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 shell<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 文本, 文本型<br /> .局部变量 文本1, 文本型<br /> .局部变量 tel, 文本型<br /> .局部变量 名字, 文本型<br /> <br /> 文本 ＝ 删全部空 (编码_UTF8到Ansi (读入文件 (取特定目录 (3) ＋ “\1.txt”)))<br /> <br /> .判断开始 (寻找文本 (文本, “省”, , 假) ≠ -1)<br />     文本1 ＝ 取文本右边 (文本_取左边 (文本, “省”, , ), 4) ＋ “省” ＋ 文本_取右边 (文本, “省”, , )<br />     tel ＝ 文本_取数字 (文本)<br />     名字 ＝ 取文本左边 (文本, 取文本长度 (文本) － (取文本长度 (文本1) ＋ 取文本长度 (tel)))<br />     调试输出 (文本1, tel, 名字)<br /> .默认<br /> <br /> <br /> <br /> <br /> <br /> <br /> .判断结束<br /> <br /> <br /> .子程序 文本_取数字, 文本型<br /> .参数 文本, 文本型<br /> .局部变量 雨, 正则表达式类<br /> .局部变量 i, 整数型<br /> <br /> 雨.创建 (“[0-9]+\d”, 文本, , , , )<br /> .计次循环首 (雨.取匹配数量 (), i)<br />     .判断开始 (取文本长度 (雨.取匹配文本 (i, 1)) ＝ 11)<br />         返回 (雨.取匹配文本 (i, 1))<br />     .默认<br /> <br />     .判断结束<br /> <br /> .计次循环尾 ()<br /> 返回 (“”)

这样写是最简单易懂，而且满足你文本不规律的条件