まずは、その「改行コードのようなもの」の正体を突き詰めるのが先ですね。
下記のようにしてみた場合、その文字は  000d や 000a 相当の値になっていますか?

Dim source As String = 何某

ListBox1.Items.Clear()

For Each c As Char In source

    ListBox1.Items.Add( AscW(c).ToString("x4") & "=>" & c )

Next