[RESOLVED] Cannot split text using vbCrlf as delimiter

[zynder]

I pulling my hair on this one. Split is not working.

Dim sometext as string


myArr() = Split(sometext, vbCrLf)

Sample data. The data is stored on sometext variable already.

 “ajkdhaljkhlkjaddfj ka gdkjgaslkjdgasjkd”:
asjkldh dfjkljgsd glakfjsfadj aldkjalkjs sl sdklfjslk fsdlkf aldjkaklsd asd klasdlkjaslkd asdjasd.

under immediate window when i try 
debug.print myArr(0)
“ajkdhaljkhlkjaddfj ka gdkjgaslkjdgasjkd”:
asjkldh dfjkljgsd glakfjsfadj aldkjalkjs sl sdklfjslk fsdlkf aldjkaklsd asd klasdlkjaslkd asdjasd.

myArr(1) will return an error.

Can somebody help me on this one?

[baja_yu]

Does InStr(sometext, vbCrLf) return >0

Maybe it's not a full carriage return/line feed, it could be just one of those. Try Splitting with vbCr or vbLf

[Siddharth Rout]

Also try

myArr() = Split(sometext, vbnewline)

[MartinLiss]

Or examine the character to see what it is.

MsgBox Asc(Mid$(sometext, n, 1)) ' Where n is the position you want to look at

[baja_yu]

I think vbCrLf constant is identical to vbNewLine. The latter one probably being newer (more verbose) and the former kept for backwards compatibility.

[MartinLiss]

I think vbCrLf constant is identical to vbNewLine. The latter one probably being newer (more verbose) and the former kept for backwards compatibility.

Yres, they are the same (asc 13).

[zynder]

I tried vbNewLine same. It didn't split.

InStr(1, sometext, vbCrLf) returned 0 OMG!!!!

[zynder]

This is unreal. Immediate Window is showing clearly that the variable has newline. why it wont split? I really don't know what is causing this.

[zynder]

LOL i missed reading post #2. VbCR worked like a charm. Woot +1 to all that helped!

[Siddharth Rout]

vbCrLf is just a "hard-coded" Carriage Return and Line Feed.

vbNewLine is platform specific and will contain whatever the appropriate codes are to generate a new line

Anyways if you try as Baja suggested

myArr() = Split(sometext, vbLf)

Then it will work. I just tried it...

[baja_yu]

That's right kool. Here are the definitions from MSDN

Const vbCrLf = "
"
Member of VBA.Constants
Constant for Carriage-return/Linefeed combination; equivalent of Chr$(13)+Chr$(10

Const vbNewLine = "
"
Member of VBA.Constants
Constant for NewLine; platform specific

Though I wonder on which platform can you run a VB6 app that does not use Cr+Lf combination for a new line character.