Question

易语言取文本中的数字

比如id=123456或者id=123456&
我想取它们中的数字，应该怎么写

Answer 1

自己编写的啊
.版本 2

.子程序 取文本数字, 文本型
.参数 原文本, 文本型
.局部变量 返回, 文本型
.局部变量 a, 整数型
.局部变量 x, 文本型

.计次循环首 (取文本长度 (原文本), a)
x ＝ 取文本左边 (取文本右边 (原文本, a), 1)
.判断开始 (x ＝ “1”)
返回 ＝ 返回 ＋ “1”
.判断 (x ＝ “2”)
返回 ＝ 返回 ＋ “2”
.判断 (x ＝ “3”)
返回 ＝ 返回 ＋ “3”
.判断 (x ＝ “4”)
返回 ＝ 返回 ＋ “4”
.判断 (x ＝ “5”)
返回 ＝ 返回 ＋ “5”
.判断 (x ＝ “6”)
返回 ＝ 返回 ＋ “6”
.判断 (x ＝ “7”)
返回 ＝ 返回 ＋ “7”
.判断 (x ＝ “8”)
返回 ＝ 返回 ＋ “8”
.判断 (x ＝ “9”)
返回 ＝ 返回 ＋ “9”
.判断 (x ＝ “0”)
返回 ＝ 返回 ＋ “0”
.默认

.判断结束

.计次循环尾 ()
返回 (返回)

仅用系统核心支持库就行

Answer 2

留下邮箱，可以发demo。

以下代码贴出：

.版本 2
.支持库 RegEx

.程序集 程序集1

.子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行
.局部变量 测试文本, 文本型

测试文本 ＝ “id=123456&”
输出调试文本 (取出数字 (测试文本))
返回 (0) ' 可以根据您的需要返回任意数值

.子程序 取出数字, 整数型
.参数 参数文本, 文本型
.局部变量 正则表达式, 正则表达式
.局部变量 搜索结果, 搜索结果

正则表达式.创建 (“id=(\d+)”, )
搜索结果 ＝ 正则表达式.搜索 (参数文本, 1, )
.如果真 (搜索结果.是否为空 ())
返回 (0)
.如果真结束
返回 (到整数 (搜索结果.取子匹配文本 (参数文本, 1, )))

追问

lkg2@sohu.com，谢谢

追答

已发送，请查收。