1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27
| If condition1 Then
If condition2 Then
str = currentLine.Split(New Char() {"|"c})
maVariable1.Add(countDictionary, str(1).Replace(" ", ""))
Try
maVariable1.Add(countDictionary, Double.Parse(str(2).Replace(" ", ""), ciClone))
Catch ex As Exception
maVariable1.Add(countDictionary, Nothing)
End Try
Try
maVariable2.Add(countDictionary, Double.Parse(str(3).Replace(" ", ""), ciClone))
Catch ex As Exception
maVariable2.Add(countDictionary, Nothing)
End Try
Try
maVariable3.Add(countDictionary, Double.Parse(str(4).Replace(" ", ""), ciClone))
Catch ex As Exception
maVariable3.Add(countDictionary, Nothing)
End Try
countDictionary += 1
Continue While
End If
End If |
Partager