Public Shared Function RegularExpression(ByVal txt As String) As String
Dim ZipRegex As String = "<\s*(?<Tag>/*\s*[^<^>^\s]+)(?<Para>(\s*[^<^>^\s]+)*)\s*>"
txt = Regex.Replace(txt, ZipRegex, "")
Return txt
End Function
放一些個人工作時會用到的技術文章。
Public Shared Function RegularExpression(ByVal txt As String) As String
Dim ZipRegex As String = "<\s*(?<Tag>/*\s*[^<^>^\s]+)(?<Para>(\s*[^<^>^\s]+)*)\s*>"
txt = Regex.Replace(txt, ZipRegex, "")
Return txt
End Function
留言