Boa tarde euEu 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)