Foxtable(狐表)用户栏目专家坐堂 → [求助]取文本中间部分内容


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

主题:[求助]取文本中间部分内容

帅哥哟,离线,有人找我吗?
狐作非为
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:456 积分:7267 威望:0 精华:0 注册:2012/2/6 12:27:00
[求助]取文本中间部分内容  发帖心情 Post By:2016/4/26 15:36:00 [只看该作者]

以下是网页源码中截取的部分
</span></span></p></dt><dd class="dataNums"><dl class="floatleft"><span class="ui-font-large ui-color-red ui-num" id="gz_gsz">2.0062</span></dl><dl id="gz_icon" class="gzup"></dl><dl class="floatleft fundZdf"><span class="ui-font-middle ui-color-red ui-num" id="gz_gszze">+0.0372</span><span class="ui-font-middle ui-color-red ui-num" id="gz_gszzl">+1.89%</span></dl></dd><dd><span>近1月:</span><span class="ui-font-middle ui-color-green ui-num">-0.25%</span></dd><dd><span>近1年:</span><span class="ui-font-middle ui-color-green ui-num">-4.04%</span></dd></dl><span class="dataOfFund-line"></span><dl class="dataItem02"><dt><p><span class="ui-color-blue"><span class="sp01"><a href="http://fund.eastmoney.com/f10/jjjz_590003.html">

如何可以取到  上面红色部分的内容。(用查找字符串的方法)。

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/26 15:39:00 [只看该作者]

Dim str As String = "<span class=""ui-font-large ui-color-red ui-num"" id=""gz_gsz"">2.0062</span>"
msgbox(str)

Dim mc = System.Text.RegularExpressions.Regex.Matches(str, "(?<=id=""gz_gsz"">)[0-9\.]+")
msgbox(mc.count)
If mc.count > 0 Then
    msgbox(mc(0).value)
End If


 回到顶部
帅哥哟,离线,有人找我吗?
狐作非为
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:456 积分:7267 威望:0 精华:0 注册:2012/2/6 12:27:00
  发帖心情 Post By:2016/4/26 15:56:00 [只看该作者]

谢谢

 回到顶部