[WinForm] - Eliminar un codigo html de texto

 

Buen Día a todos! este es un pequeño y práctico ejercicio de como eliminar por ejemplo las etiquetas <b> y </b> que vienen a ser el relleno Negrita que hace algún tiempo ayude a un usuario solicitando esto y me pareció adecuado postearlo en el blog. Como podrán observar se hace un recorrido de toda la cadena :

Codigo VB.NET :

Dim nuevaCadena As String = ""

        Dim s as String = "<b>Programacion </b>.Net <b>Facil</b>, verdad <b>que </b>es <b>facil</b>? =)"

        Dim a As Char() = s.ToCharArray

        Dim cont As Integer = 0

        For i As Integer = 0 To Label1.Text.Length - 1

            If (a(i).ToString.Equals("<")) Then

                If (a(i + 1).ToString.Equals("/")) Then

                    If (a(i + 2).ToString.Equals("b")) Then

                        If (a(i + 3).ToString.Equals(">")) Then

                            cont = i + 4

                        End If

                    End If

                End If

                If (a(i + 1).ToString.Equals("b")) Then

                    If (a(i + 2).ToString.Equals(">")) Then

                        cont = i + 3

                    End If

                End If

            End If

            If (i >= cont) Then

                nuevaCadena = nuevaCadena & a(i).ToString

            End If

        Next

        MessageBox.show(nuevaCadena)

Original :
Programacion .Net Facil, verdad que es facil? =) :

<b>Programacion </b>.Net <b>Facil</b>, verdad <b>que </b>es <b>facil</b>? =)

Resultado :
Programacion .Net Facil,verdad que es facil? =)

Espero les haya sido de utilidad. Saludos!.