以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 急!!!正则如何怎么获取一段文章呢 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=169183) |
-- 作者:zhuya820 -- 发布时间:2021/6/5 19:20:00 -- 急!!!正则如何怎么获取一段文章呢 Dim Str As String = "搜索发现[回车符]复星妈咪宝贝_全新升级,爸妈必看?官方入口?[回车符]复星妈咪宝贝_186种疾病保障,少儿特疾/罕见疾病加倍赔,可选重疾/恶肿多次赔付,买保险上慧择,纳斯达克上市品牌,更安心!免费定制保险方案[回车符]复星联合妈咪宝贝_买前要看的3个坑[回车符]重疾险怎么买划算,今天聊聊复星联合妈咪宝贝,帮你解读重疾险,节省40%保费,不花冤枉钱.猪保保公众号,一个中立?客观?公正,评测保险的公众号![回车符]关于复星妈咪保贝--看这篇文章就够了[回车符]重疾险怎么买划算,今天和你聊聊复星妈咪保贝,帮你解读重疾险,节省40%保费,不花冤枉钱.猪保保公众号,一个中立?客观?公正,评测保险的公众号![回车符]哪里可以买复星妈咪宝贝 2021爆款少儿重疾险 95%的爸妈选择投保![回车符]哪里可以买复星妈咪宝贝 这款儿童重疾险保173种疾病,重大疾病二次赔付;少儿特定及罕见疾病,赔付高达300万;投/被保人双豁免.保费更便宜,保障更全面,性价比超高![回车符]广告[回车符]词条标签[回车符]汉字 数字 词汇 汉语 量词[回车符]3分钟送屠龙,10分钟送开天,这爆率,上线两小时直接霸服![回车符]儿童口罩3层熔喷透气[回车符]百[回车符]百[回车符]百科专题更多[回车符][回车符]二十四节气之谷雨[回车符][回车符]世界帕金森病日[回车符][回车符]" Dim Str1 As String str1 = "(?<=词条标签).(?=百科专题)" \'这段只能去除,可不可以保留这一段,而不是去一头一尾,直接截取以上段落之间的文字 Str = System.Text.Regularexpressions.Regex.Replace(Str,Str1,"") MessageBox.Show(str) 谢谢!大神 ! [此贴子已经被作者于2021/6/5 19:21:02编辑过]
|
-- 作者:有点蓝 -- 发布时间:2021/6/6 20:21:00 -- str1 = "(?<=词条标签).*(?=百科专题)" Dim rgx = new System.Text.RegularExpressions.Regex(str1, System.Text.RegularExpressions.RegexOptions.IgnoreCase) For Each match As System.Text.RegularExpressions.Match In rgx.Matches(Str) Output.Show(match.Value ) Next
|