2015-09-14 102 views
0

我有一個字符串格式如下最佳途徑解析文件

Zone: 1 Events: 3 
Zone: 2 Events: 7 

我解析的文件,下面的代碼

Dim strarr() As String 
strarr = Str.Split("/n") 
for i = 0 to 2 
    dim strarrNew() as string 
    strarrNew = strarr(i)Split(" ") 
    use value strarrNew(0) 
     use value strarrNew(1)  
next 

,我直接利用價值,但如果他們是在一個錯誤字符串輸入

Zone:1Events: 3 

空間缺失不是代碼將無法正常工作。 什麼是解析文件的最佳方式。

+0

你的問題不夠清楚,能否請你解釋一下是什麼您預期的輸出? –

+0

對於第一行我的預期輸出將是1,3 –

+0

對於第二行我的輸出將是2,7 –

回答

0

可以採用這種解決方案只有在所有從該文件中輸入相同的格式:

For Each line As String In File.ReadAllLines("F:\sample.txt") 
     Dim strarrNew() As String = line.Split(":"c.ToCharArray()) 
     Dim zone As Integer = CInt(Val(strarrNew(1))) 
     Dim events As Integer = CInt(Val(strarrNew(2))) 
     'Perform your operations 
    Next 
+0

感謝您的幫助 –

+0

沒有意義將一個字符轉換爲char數組,您可以使用'line.Split(「 :「c)'代替。此外'Val'返回一個'Double',因此'CInt'或'Int32.Parse' /'Int32.TryParse'是一個更好的選擇 –