正则提不到，不会了。帮我看一下分数（已解决）

5735988

方天为准。
2026049天
26-02-28周六345总分数[3,8,4]
2026049天考试中[4,1,7]
2026048天
26-02-27周五365总分数[4，8，6]
2026047天
26-02-26周四467总分数[5，5，3]
2026046天
26-02-25周三125总分数[6，3，7]
2026045天
26-02-24周二481总分数[7，4，0]
2026044天
26-02-13周五529总分数[8，2，8]
2026043天
26-02-12周四562总分数[9，4，2]
2026042天
26-02-11周三241总分数[0，4，1]
2026041天
26-02-10周二501总分数[2，6，9]
2026040天
26-02-09周一625总分数[2，3，0]
选择天次
取消window.__





上面是文本，
要提取 049天345总分数
结果：   
049=345
048=365
047=467

$Str = FileRead("1.txt")
$Str = StringRegExpReplace($Str, "2026(.*?)天", "")
MsgBox(0,0,$Str[0])   

帮我看一下正则，晚上1点了，还在看正则，正则是不是有什么工具，可以学习一下。

gyp2000

$sText = "方天为准。" & @CRLF
$sText &= "2026049天" & @CRLF
$sText &= "26-02-28周六345总分数[3,8,4]" & @CRLF
$sText &= "2026049天考试中[4,1,7]" & @CRLF
$sText &= "2026048天" & @CRLF
$sText &= "26-02-27周五365总分数[4，8，6]" & @CRLF
$sText &= "2026047天" & @CRLF
$sText &= "26-02-26周四467总分数[5，5，3]" & @CRLF
$sText &= "2026046天" & @CRLF
$sText &= "26-02-25周三125总分数[6，3，7]" & @CRLF
$sText &= "2026045天" & @CRLF
$sText &= "26-02-24周二481总分数[7，4，0]" & @CRLF
$sText &= "2026044天" & @CRLF
$sText &= "26-02-13周五529总分数[8，2，8]" & @CRLF
$sText &= "2026043天" & @CRLF
$sText &= "26-02-12周四562总分数[9，4，2]" & @CRLF
$sText &= "2026042天" & @CRLF
$sText &= "26-02-11周三241总分数[0，4，1]" & @CRLF
$sText &= "2026041天" & @CRLF
$sText &= "26-02-10周二501总分数[2，6，9]" & @CRLF
$sText &= "2026040天" & @CRLF
$sText &= "26-02-09周一625总分数[2，3，0]" & @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

yohoboy

gyp2000 发表于 2026-3-1 04:26
$sText = "方天为准。" & @CRLF
$sText &= "2026049天" & @CRLF
$sText &= "26-02-28周六345总分数[3,8,4]" ...

樓上大老的正則工具  v3.8  是從 3.3.16.1 安裝版才有的嗎???

gyp2000

yohoboy 发表于 2026-3-1 13:06
樓上大老的正則工具  v3.8  是從 3.3.16.1 安裝版才有的嗎???

整合版里都有这工具的源码，可以将源码编译成文件单独使用。

fybhwsx

试了也弄不好。哈哈。