一个 关于 String 的讨论

Question

我得到一个string 它的格式是： 
str=str1 & vbtab & str2 & vbtab & str3 & vbcrlf 
其中 str1 和 str2 和 str3 都是 string 型  
现在我想从str里面把 str1 str2 str3 分离出来，我用下面的方法。总觉得有些繁琐，那位能帮忙改进共同提高 谢谢 ！ Dim firTab As Integer 
Dim secTab As Integer 
Dim theCrlf as Integer firTab = str.IndexOf(vbTab) 
str1 = str.Substring(0, firTab)                                          str2 = str.Substring(firTab + vbTab.Length, str.Length - firTab - vbTab.Length) 
secTab = str2.IndexOf(vbTab) 
str3 = str2.Substring(secTab + vbTab.Length, str2.Length - secTab - vbTab.Length) 
str2 = str2.Substring(0, secTab)  
                                
thCrlf = str3.IndexOf(vbTab) 
str3 = str3.Substring(0, thCrlf)

Answer 1

有人帮忙解决了 用 split
Dim s() As String
str = str1 & vbtab & str2 & vbtab & str3 & vbcrlf
s = str.Split(vbTab)
s数组里面就是你需要的内容。

Answer 2

Dim s() As String 
str = str1 & vbtab & str2 & vbtab & str3 & vbcrlf 
s = str.Split(vbTab) 
s数组里面就是你需要的内容。