以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 替换问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=58120) |
-- 作者:qianqian1530 -- 发布时间:2014/10/11 17:32:00 -- 替换问题 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) 为什么不行呢/ 想把 <img border=""0"" src=""C:/Users/qc/Desktop/s/iPad5/w/38566738371/online.gif"" style=""ZOOM: 1; VISIBILITY: visible"" /><br /> 这句话替换掉
|
-- 作者:sdlll -- 发布时间:2014/10/11 22:19:00 -- 问题在“”吧
|
-- 作者:有点甜 -- 发布时间:2014/10/12 9:20:00 -- 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) |
-- 作者:qianqian1530 -- 发布时间:2014/10/13 19:30:00 -- 不行, 还是 替换不了 |
-- 作者:有点甜 -- 发布时间:2014/10/13 19:37:00 -- 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) |