专家坐堂-[求助]关于正则表达式提取多组数据？Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]关于正则表达式提取多组数据？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=194257)

--  作者：zto001
--  发布时间：2024/11/22 16:58:00
--  [求助]关于正则表达式提取多组数据？
[求助]关于正则表达式提取多组数据？
我又多个正则表达式，需要提取多组匹配的上的数据要怎么写代码

比如正则表达式为： JT\\d{5} 、 9\\d（7）、 10\\d{3}
有一个字符串里有多个可以满足上面的表达式，我需要全部提取出来

--  作者：有点蓝
--  发布时间：2024/11/22 17:42:00
--
dim 正则表达式 as string = "[JT\\d{5}|9\\d（7）|10\\d{3}]"

--  作者：zto001
--  发布时间：2024/11/22 18:35:00
--

Dim s As String = e.Form.Controls("XZ_工单诉求").text
Dim p As String = "[JT\\d{13}|777\\{13}|773\\{13}|9\\d{12}]"
Dim rgx = New System.Text.RegularExpressions.Regex(p, System.Text.RegularExpressions.RegexOptions.IgnoreCase)
For Each match As System.Text.RegularExpressions.Match In rgx.Matches(s)
Output.Show(match.Value)
\'为啥提取出来的是一个一个字，不是整段的
Next

--  作者：有点蓝
--  发布时间：2024/11/23 9:10:00
--

Dim s As String = e.Form.Controls("XZ_工单诉求").text
Dim p As String = "[^JT\\d{13}|777\\{13}|773\\{13}|9\\d{12}]"
Dim str = System.Text.RegularExpressions.Regex.Replace(s, p, "")
Output.Show(str)