Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/16.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
在getbetween中找到VB.net第二个字符串_Vb.net_Substring - Fatal编程技术网

在getbetween中找到VB.net第二个字符串

在getbetween中找到VB.net第二个字符串,vb.net,substring,Vb.net,Substring,我有一个函数,它提供两个单词之间的文本: Private Shared Function GetBetween(ByRef strSource As String, ByRef strStart As String, ByRef strEnd As String, Optional ByRef startPos As Integer = 0) As String Dim iPos As Integer, iEnd As Integer, lenStart As Integer = str

我有一个函数,它提供两个单词之间的文本:

Private Shared Function GetBetween(ByRef strSource As String, ByRef strStart As String, ByRef strEnd As String, Optional ByRef startPos As Integer = 0) As String
    Dim iPos As Integer, iEnd As Integer, lenStart As Integer = strStart.Length
    Dim strResult As String
    strResult = String.Empty
    iPos = strSource.IndexOf(strStart, startPos)
    iEnd = strSource.IndexOf(strEnd, iPos + lenStart)
    If iPos <> -1 AndAlso iEnd <> -1 Then
        strResult = strSource.Substring(iPos + lenStart, iEnd - (iPos + lenStart))
    End If
    Return strResult
End Function
Private共享函数GetBetween(ByRef strSource作为字符串,ByRef strStart作为字符串,ByRef strud作为字符串,可选ByRef startPos作为整数=0)作为字符串
Dim iPos为整数,iEnd为整数,lenStart为整数=strStart.Length
作为字符串的Dim strResult
strResult=String.Empty
iPos=strSource.IndexOf(strStart,startPos)
iEnd=strSource.IndexOf(强度、IPO+lenStart)
如果IPO为-1且iEnd为-1,则
strResult=strSource.Substring(iPos+lenStart,iEnd-(iPos+lenStart))
如果结束
返回strResult
端函数
因此,我的html代码是:

<div class="upper-right-section">
            <div class="header-stats">


    <div class="stat-entry">
        <span class="stat-value">48998</span>
  <span class="stat-name">iscritti</span>

    </div>



    <div class="stat-entry">
        <span class="stat-value">22760801</span>
  <span class="stat-name">visualizzazioni video</span>

    </div>

  </div>

          <span class="valign-shim"></span>
        </div>

48998
伊斯克里蒂
22760801
可视化Zazioni视频

我得到了两次
,我想得到第二次匹配的值,我该怎么办?谢谢你,matteo。

对于一般的html解析,HAP或CSQuery都很好,但是如果这是您程序中的一个孤立案例,并且您确信html源代码将保持不变,那么您可以使用以下方法:

Dim value As String = Split(Split(theHtmlStringHere, "<span class=""stat-value"">")(2), "</span>")(0)
Dim值为String=Split(Split(htmlstringhere,“”)(2),“”)(0)

使用+1代替HAP。该函数已失效:StartPos由ref传递,但未设置为find位置。否则,只需调用函数2次。将StartPos设置为函数中找到的字符串的索引,就完成了。更好地使用HAP