Check whether there is a space before and after a character to perform string spiting

[greeraply]

I am trying to split a string based on the \[code\]-\[/code\] character and insert the words before and after the \[code\]-\[/code\] character into a list (\[code\]result\[/code\]) both words with different indexes. What I am trying to achieve is to check whether there is a space before and after the character \[code\]-\[/code\]. If there is space found, perform the splitting as mentioned earlier. Otherwise, if there is no space before or after \[code\]-\[/code\], do not perform any splitting. Example:String1 = London - United KingdomString2 = Paris-FranceSplit \[code\]String1\[/code\] and insert \[code\]London\[/code\] with \[code\]index(0)\[/code\] and \[code\]United Kingdom\[/code\] with \[code\]index(1)\[/code\] into the \[code\]result\[/code\] list because there is space before and after the \[code\]-\[/code\]Do not split \[code\]String 2\[/code\] and insert \[code\]Paris-France\[/code\] with \[code\]index(0)\[/code\]because there is no space before and after \[code\]-\[/code\]. Code: \[code\] Dim result As New List(Of String)() For Each str_get As String In Split If (str_get.IndexOf("\t-\t")) Then Dim splitStr = str_get.Split({"-", "/"}, StringSplitOptions.None) For Each str_split As String In splitStr 'Add to result list result.Add(str_split.Trim()) ' Enter into result list ' result.TrimExcess() Next Else End If\[/code\]\[code\]Split\[/code\] Is a string which may be considered as an array of strings. The \[code\]For\[/code\] loop is to take each string in that Array and check it. Any Thoughts or suggestions ?