我需要一个函数来切断斜杠之间的部分字符串(/)。
Dim str As String = "Hi my /unnecessary string 1/ name /unnecessary string 2/ is Bob /unnecessary string 3/"
'code to remove unnecessary parts of the string goes here
MsgBox(str)
请注意str
是用户的输入,我只是使用此代码段来提供一个简洁的解释。谢谢。
答案 0 :(得分:2)
您可以使用Split查找/
字符之间的每个字符串,并显示每个字符串:
Dim str As String = "Hi my /unnecessary string 1/ name /unnecessary string 2/ is Bob /unnecessary string 3/"
Dim parts As String() = str.Split("/"c)
For i = 0 To parts.Count - 1 Step 2
Debug.WriteLine(parts(i).Trim)
Next
或者您可以使用正则表达式在正斜杠之间删除文本:
Dim pattern = "/.*?/"
Dim myString = Regex.Replace(str, pattern, "")
Debug.WriteLine(myString)