split salto de línea

 Dim campos() As String = Nothing
 Dim arg() As String = {vbCrLf, vbLf}
 Dim extras As String = xml.GetElementsByTagName("Extras")(0).OuterXml
campos = extras.Split(arg, StringSplitOptions.None)


fuente