Split options from Character strings

hi
I have post Code Split option

Dim Readlines As String() = StrServer.Split(New String() {Environment.NewLine}, StringSplitOptions.RemoveEmptyEntries)
Dim Readseparators As Char() = New Char() {Chr(10), Chr(13)}
Dim Readlines As String() = StrServer.Split(separators, StringSplitOptions.RemoveEmptyEntries)