求教！！！如何使用正则表达式去掉html标签

Question

try.......... Function cleanHTML(htmlStr)

Dim regEx
SET regEx = New Regexp
regEx.IgnoreCase = True
regEx.Global = True
regEx.Pattern = "<a.+?>.+?</a>"
htmlStr = regEx.Replace(htmlStr,"")

cleanHTML = htmlStr
SET regEx = Nothing
End Function

Answer 1

s = s.replace(/<a[^<>]+>[\s\S]+?<\/a>/gi, "");
楼上的兄弟没有考虑S里的换行

Answer 2

大哥我是过了不能去掉！！再帮我看看谢谢!!!!
我的代码是：
...
  Pattern p= Pattern.compile("(<[a-zA-Z].*?>|<[/][a-zA-Z].*?>)");//去掉所有的html标签
// Pattern p= Pattern.compile("(<[aA].*?>|<[/][aA].*?>)");//着个去掉了<a></a>,但是超级连接的文字还在啊!
   Pattern p= Pattern.compile("<a.+?>.+?</a>");
            Matcher m = p.matcher(string);
            StringBuffer sb = new StringBuffer();
            boolean result = m.find();
            while (result) {                m.appendReplacement(sb, "");
                result = m.find();
            }
            m.appendTail(sb);
            String TString=sb.toString();
            return TString;
        }
    }

Answer 3

ok了多谢！！！！！Pattern p= Pattern.compile("<[aA].*?>.*?<[/][aA]>");