Public Function Trim(extends stringArray() as string) as string()
For i As Integer = 0 To stringArray.ubound
stringArray(i) = Trim( stringArray(i) )
Next
Return stringArray
End Function
and now you can do something like
dim chunks() as string = Split(inputText,splitChar).Trim
and the array in chunks is split & trimmed