Experts Exchange Solution brought to you by
"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.
Dim txt2highlight As String = "downloaded images"
Dim pattern As String = "<SPAN class=fcg>\s*([\s\S]*?)\s*</SPAN>"
Dim htmlsrc As String = frmMain.WebBrowser1.Document.DomDocument.documentElement.InnerHTML
Dim txt As String = String.Empty
Dim tag As String = String.Empty
For Each m As Match In Regex.Matches(htmlsrc, pattern)
txt = m.Groups("text").Value.Replace(txt2highlight, "<span style=""background-color:#44F; color:#FFF"">" & txt2highlight & "</span>")
tag = m.Value.Replace(m.Groups("text").Value, txt)
htmlsrc = htmlsrc.Replace(m.Value, tag)
Open in new window
This course teaches how to install and configure Windows Server 2012 R2. It is the first step on your path to becoming a Microsoft Certified Solutions Expert (MCSE).
Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.
From novice to tech pro — start learning today.
Members can enroll in this course at no extra cost.