左栏'); } else{ document.write('关闭左栏'); } }catch(e){alert(e);}
Foxtable(狐表)用户栏目专家坐堂 → [求助]抽取内容


  共有535人关注过本帖树形打印复制链接

主题:[求助]抽取内容

美女呀,离线,留言给我吧!
OKK
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:341 积分:3533 威望:0 精华:0 注册:2016/11/22 19:30:00
[求助]抽取内容  发帖心情 Post By:2019/6/14 21:03:00 [只看该作者]

dim hj as string = "<p>好的!<img src='img/emotion/face01/2.png'>thankyou!886</p>"

求代码,获取:好的!thankyou!886

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:33522 积分:170716 威望:0 精华:8 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/6/14 21:40:00 [只看该作者]

Dim hj As String = "<p>好的!<img src='img/emotion/face01/2.png'>thankyou!886</p>"
Dim p As String = "(?<=>).*?(?=<)"
Dim rgx = new System.Text.RegularExpressions.Regex(p, System.Text.RegularExpressions.RegexOptions.IgnoreCase)

For Each  match As System.Text.RegularExpressions.Match In rgx.Matches(hj)
    Output.Show(match.Value )
Next


 回到顶部
美女呀,离线,留言给我吧!
OKK
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:341 积分:3533 威望:0 精华:0 注册:2016/11/22 19:30:00
  发帖心情 Post By:2019/6/14 22:02:00 [只看该作者]

好的!thankyou!图片点击可在新窗口打开查看

 回到顶部