Boa tarde eu uso o seguinte código vb.net: Public Function limpaHTML_Recursiva(ByVal sTexto As String, ByVal j As Integer) As String If j = 0 Then Return sTexto End If Dim i As Integer = 0 i = InStr(sTexto, "<") j = InStr(sTexto, ">") If i > 0 Then i -= 1 End If sTexto = Left(sTexto, i) & Right(sTexto, sTexto.Length - j) Return (limpaHTML_Recursiva(sTexto, j)) End Function Chama com :`sTexto = limpaHTML_Recursiva(sTexto, 1)`