正则提不到，不会了。帮我看一下分数（已解决）
本帖最后由 5735988 于 2026-3-3 16:46 编辑方天为准。
2026049天
26-02-28周六345总分数
2026049天考试中
2026048天
26-02-27周五365总分数
2026047天
26-02-26周四467总分数
2026046天
26-02-25周三125总分数
2026045天
26-02-24周二481总分数
2026044天
26-02-13周五529总分数
2026043天
26-02-12周四562总分数
2026042天
26-02-11周三241总分数
2026041天
26-02-10周二501总分数
2026040天
26-02-09周一625总分数
选择天次
取消window.__
上面是文本，
要提取 049天345总分数
结果：
049=345
048=365
047=467
$Str = FileRead("1.txt")
$Str = StringRegExpReplace($Str, "2026(.*?)天", "")
MsgBox(0,0,$Str)
帮我看一下正则，晚上1点了，还在看正则，正则是不是有什么工具，可以学习一下。
本帖最后由 gyp2000 于 2026-3-1 04:30 编辑
$sText = "方天为准。" & @CRLF
$sText &= "2026049天" & @CRLF
$sText &= "26-02-28周六345总分数" & @CRLF
$sText &= "2026049天考试中" & @CRLF
$sText &= "2026048天" & @CRLF
$sText &= "26-02-27周五365总分数" & @CRLF
$sText &= "2026047天" & @CRLF
$sText &= "26-02-26周四467总分数" & @CRLF
$sText &= "2026046天" & @CRLF
$sText &= "26-02-25周三125总分数" & @CRLF
$sText &= "2026045天" & @CRLF
$sText &= "26-02-24周二481总分数" & @CRLF
$sText &= "2026044天" & @CRLF
$sText &= "26-02-13周五529总分数" & @CRLF
$sText &= "2026043天" & @CRLF
$sText &= "26-02-12周四562总分数" & @CRLF
$sText &= "2026042天" & @CRLF
$sText &= "26-02-11周三241总分数" & @CRLF
$sText &= "2026041天" & @CRLF
$sText &= "26-02-10周二501总分数" & @CRLF
$sText &= "2026040天" & @CRLF
$sText &= "26-02-09周一625总分数" & @CRLF
$sText &= "选择天次" & @CRLF
$sText &= "取消window.__" & @CRLF
Local $vResult = StringRegExp($sText, '(?is)2026(\d+)天\R.*?(\d+)总分数', 3)
If @error Then Exit
For $s = 0 To UBound($vResult) - 1 Step 2
ConsoleWrite($vResult[$s] & "=" & $vResult[$s + 1] & @CRLF)
Next
gyp2000 发表于 2026-3-1 04:26
$sText = "方天为准。" & @CRLF
$sText &= "2026049天" & @CRLF
$sText &= "26-02-28周六345总分数" ...
樓上大老的正則工具v3.8是從 3.3.16.1 安裝版才有的嗎??? yohoboy 发表于 2026-3-1 13:06
樓上大老的正則工具v3.8是從 3.3.16.1 安裝版才有的嗎???
整合版里都有这工具的源码，可以将源码编译成文件单独使用。 本帖最后由 fybhwsx 于 2026-3-1 20:33 编辑
试了也弄不好。哈哈。
页:
[1]