將字符串拆分成部分

Question

我想將字符串拆分成部分，但無法弄清楚！

我主要是從字符串

"hello bye see you" 

讀取從"bye" to "you"

我試圖

Dim qnew() As String = tnew.Split(" ") 

但我被困在代碼的其他部分，我真的想一些幫幫我。 很抱歉，如果我不是最好的解釋的事情，至少我盡力了：/

Answer 1

我假設你的預期輸出是。如果我理解正確，則下列方法可用於獲取所需的輸出：

在該串分成數組（splits()）與分隔符" "和然後該陣列使用for loop得到bye和you之間的陣列中的字符串找出的bye（j）和you（k）指數。

Function GETSTRINGBETWEEN(ByVal start As String, ByVal parent As String, ByVal [end] As String) 
     Dim output As String = "" 
     Dim splits() As String = parent.Split(" ") 
     Dim i As Integer 
     Dim j As Integer = Array.IndexOf(splits, start) 
     Dim k As Integer = Array.IndexOf(splits, [end]) 
     For i = j To k 
      If output = String.Empty Then 
       output = splits(i) 
      Else 
       output = output & " " & splits(i) 
      End If 
     Next 
     Return output 
    End Function 

用法：

Dim val As String 
val = GETSTRINGBETWEEN("bye", "hello bye see you", "you") 
'val="bye see you" 

---

Function GET_STRING_BETWEEN(ByVal start As String, ByVal parent As String, ByVal [end] As String) 
     Dim output As String 
     output = parent.Substring(parent.IndexOf(start) _ 
               , (parent.IndexOf([end]) _ 
                - parent.IndexOf(start)) _ 
                ).Replace(start, "").Replace([end], "") 
     output = start & output & [end] 
     Return output 
    End Function 

用法：

Dim val As String 
val = GET_STRING_BETWEEN("bye", "hello bye see you", "you") 
'val="bye see you"