怎么过滤文本里面的的所有东西，只保留数字

穷人孩子早出家

怎么过滤文本里面的的所有东西，只保留数字？
1592484124
1878010497
114-99999-4
847319989
2323953935
2080225755
774190555
11228550
977678218
1165134088
0000000
734847502
494733389
2629623580
746024374
1981929734
1981929734
2465660527
2289838648
2297876770
59017883
59017883
262441918
984280388
1209136120
QQ269378842
994559357
919056636
496464239
1830982460
1526246939
273407417
2252941367
2627505622
752602725
425537049
324496656
324496656
2095617779
1601346886
2757855356
1042628731
270704669
微信号：mryq365
715113807
像这样的文本把里面的：114-99999-4，微信号：mryq365，QQ269378842（这样的只去QQ数字保留）

臭臭臭臭臭Bitch

新建 好压 ZIP 压缩文件.zip (128.85 KB, 下载次数: 493)

2014-8-3 15:57 上传

点击文件名下载附件

寻找星空

文本_只取数字()

剩下我de孩子气

正则  数字

剩下我de孩子气

[1-9][0-9]{4,}

梦生

子文本替换(原文本，“微信号：”，“”)
子文本替换(原文本，“QQ”，“”)

寻找星空

正则.创建(”[1-9][0-9]{4,}“)
文本区分_只取数字()

寻找星空

  

子程序名	返回值类型	公开	备 注
正则_匹配批量	整数型
参数名	类 型	参考	可空	数组	备 注
源文本	文本型

变量名	类 型	静态	数组	备 注
局_正则	正则表达式类
局_匹配数	整数型
局_计次	整数型

如果真 (局_正则.创建 (“[1-9][0-9]{4,}”, 源文本, 假, 假, 真,真) ＝ 假)
信息框 (“正则创建失败，请检查正则表达式语句是否有误！”, #错误图标, )
返回 (0)
局_匹配数 ＝ 局_正则.取匹配数量 ()
如果真 (局_匹配数 ＝ 0)
信息框 (“匹配失败，请检检查正则语句是否有误，数量：0”, #错误图标, )
返回 (0)
计次循环首 (局_匹配数, 局_计次)
输出调试文本 (“匹配文本 ” ＋ 到文本 (局_计次) ＋ “ 中的子匹配文本 1：” ＋ 局_正则.取子匹配文本 (局_计次, 1))
计次循环尾 ()
返回 (局_匹配数)

.版本 2<br /> <br /> .子程序 正则_匹配批量, 整数型<br /> .参数 源文本, 文本型<br /> .局部变量 局_正则, 正则表达式类<br /> .局部变量 局_匹配数, 整数型<br /> .局部变量 局_计次, 整数型<br /> <br /> .如果真 (局_正则.创建 (“[1-9][0-9]{4,}”, 源文本, 假, 假, 真,真) ＝ 假)<br />     信息框 (“正则创建失败，请检查正则表达式语句是否有误！”, #错误图标, )<br />     返回 (0)<br /> .如果真结束<br /> 局_匹配数 ＝ 局_正则.取匹配数量 ()<br /> .如果真 (局_匹配数 ＝ 0)<br />     信息框 (“匹配失败，请检检查正则语句是否有误，数量：0”, #错误图标, )<br />     返回 (0)<br /> .如果真结束<br /> .计次循环首 (局_匹配数, 局_计次)<br />     输出调试文本 (“匹配文本 ” ＋ 到文本 (局_计次) ＋ “ 中的子匹配文本 1：” ＋ 局_正则.取子匹配文本 (局_计次, 1))<br /> .计次循环尾 ()<br /> 返回 (局_匹配数)