参考代码
Dim str As String = "<DIV><P>如题 </P><P> </P><P>如果直接提取就是一串html代码 我想直接提取文字部分</P></DIV>"msgbox(str)str = System.Text.RegularExpressions.Regex.Replace(str, "<\/?.+?>", "")msgbox(str)