VB使用正则表达式提取数据的代码如下:
Dim reg As Object
Dim mat as Object
Dim str as String
Set reg = CreateObject("VBScript.RegExp")
'全部匹配完成后再返回'
reg.Global = True
'设置正则表达式'
reg.Pattern = "<tr>[\s\S]*</tr>"
'执行正则表达式'
Set mat = reg.Execute(str)
'输出数据'
For Each str In mat
debug.Print str
Next str
常用的通配符(markdown画表格太麻烦了,直接上图)
![](https://img.haomeiwen.com/i2689449/e3d72dd6d318e598.png)
网友评论