s=
(
1、5266184、/8
、5275660、/2
空1701896、5
4619851、/
、1758236
、177747、/
、1814363、/6
、、/
)
; 新版，保留4-9的连续数字
re:="[^\r\n]*?(\d{4,9})[^\r\n]*|[^\r\n]*"
msgbox % Clipboard:=RegExReplace(s, re, "$1")

;老版，和上面的版本有着不同的适用范围
re:="[^\r\n\d]*(\d+)?[^\r\n]*"
msgbox % Clipboard:=RegExReplace(s, re, "$1")

 

声明：站内资源为整理优化好的代码上传分享与学习研究，如果是开源代码基本都会标明出处，方便大家扩展学习路径。请不要恶意搬运，破坏站长辛苦整理维护的劳动成果。本站为爱好者分享站点，所有内容不作为商业行为。如若本站上传内容侵犯了原著者的合法权益，请联系我们进行删除下架。