Dim str As String = "<img border=""0"" src=""C:/Users/qc/Desktop/s/iPad5/w/38566738371/online.gif"" style=""ZOOM: 1; VISIBILITY: visible"" /><br /><img src=""C:/Users/qc/Desktop/s/iPad5/w/38566738371/1380835418_557133308.jpg"" /><br /><img src=""C:/Users/qc/Desktop/s/iPad5/w/38566738371/1380835411_557133308.jpg"" /><br /><img src=""C:/Users/qc/Desktop/s/iPad5/w/38566738371/1381503312_557133308.jpg"" /><br />" Dim reg As new System.Text.RegularExpressions.Regex(".+(?=\visible"""" /><br />+)") str = reg.replace(str, "") msgbox(str)
|