求正则查找并替换的方法
已知内容：<h4>标题1</h4>qrefasdfasdfasfasfasfasf<h4>标题二</h4>asfasff<h4>标题第大在我</h4>asdfasdfasdfasdf.....

求正则表达式批量将：
<h4>。。。</h4>  替换为   <h4><a href=/?s=。。。>。。。</a></h4>
这样的
------解决方案--------------------

引用:

已知内容：<h4>标题1</h4>qrefasdfasdfasfasfasfasf<h4>标题二</h4>asfasff<h4>标题第大在我</h4>asdfasdfasdfasdf.....

求正则表达式批量将：
<h4>。。。</h4>  替换为   <h4><a href=/?s=。。。>。。。</a></h4>
这样的

这个不是很简单么？

Set RegEx = New RegExp 

RegEx.Pattern = "<h4>(.*?)<\/h4>" 

RegEx.IgnoreCase = True 

RegEx.Global = True 

str = RegEx.replace(str,"<h4><a href=/?s=$1>$1</a><\/h4>") 

Set RegEx = Nothing

直接这样不就可以了
你自己都描述出来了，就直接套进去都OK了，这点都不想自己动手做一下
------解决方案--------------------
"<h4>([\d\D]*?)<\/h4>"