EndOfLine problem

I want to create a new line but is not working right in osx. Any suggestion?

if TargetMacOS then eol = EndOfLine.OSX
...
      //Populate row.
      ListBox3.CellHelpTag(rownumber,columnumber) = "Target information: " + eol _
      + "            " + eol _
      + "Target: " + a1(1) + eol _
      + "Constelation: " + constelation + eol _
      + "RA Unit: " + raunit + eol _
      + "DE Unit: " + deunit + eol _
      + "Magnitude: " + mag +eol _
      + "Radius Units: " + radiounits +eol _
      + "Names: " + names

It s is called EndOfLine.Macintosh, which was for OS 9. On OS X you have to use EndOfLine.UNIX.

Tente com + chr(13)…

Thank you but the suggestions do not work. More suggestions?
prtsc :
http://s8.postimg.org/lcvtt2fxx/Captura_de_ecr_2015_05_14_s_17_02_57.png

Esta linha de cdigo…

lb.CellHelpTag(lb.LastIndex, i -1) = "Teste " + chr(13) + "Linha 2 " + chr(13) + "Linha 3"

Produz este resultado em meu teste…

Ol Adelar, eu resolvi o problema usando o Trim(). Parece que a info que estou puxar de uma api contem uns caracteres.

Que bom que resolveu. V que haviam caracteres estranhos na sua cpia de tela, mas achei que fosse apenas pgina de cdigo errada… (encoding).