Parses out html tags from a string.

by Andrew Silvernail (2 Submissions)
Category: String Manipulation
Compatability: Visual Basic 5.0
Difficulty: Unknown Difficulty
Originally Published: Fri 16^th November 2001
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

API Declarations
'you need a rich text box named rtb1

Rate Parses out html tags from a string.



'strurl is the desired string to be parsed

For intloop = 1 To Len(strurl)
    If Mid(strurl, intloop, 1) = ">" Then 'continue until "<"
        For intloop2 = intloop To Len(strurl)
            If Mid(strurl, intloop2, 1) = "<" Then
                If intloop + 1 = intloop2 - 1 Then
                    Exit For
                Else
                    rtb1.Text = rtb1.Text & Mid(strurl, intloop + 1, (intloop2 - intloop) - 1) 'write to rtb1
                    Exit For
                End If
            End If
        Next
    End If
Next
End Sub

Download this snippet Add to My Saved Code

Parses out html tags from a string. Comments

No comments have been posted about Parses out html tags from a string.. Why not be the first to post a comment about Parses out html tags from a string..

Parses out html tags from a string.

Parses out html tags from a string. Comments

Post your comment

Difficulty