I think what you want is like:
Dim PN As New ArrayList()
Dim splitElement as String() = Nothing
For Each element In file1array
splitElement = element.Split("."c, 1)
PN.Add(splitElement(0))
Next
You have to add each
Split
result to the
ArrayList
separately.