Убрать символ перевода каретки - VB

Формулировка задачи:

Ребят, прошу помощь с такой вот темой:
У меня есть чек (такие вот данные), скопированный из текстового файла в Memo:
8600001F 7E40 FFFF7507700001154861 010000
06 50000000 383100 840300 780500 44ABDD84
060A 00 A84800 B0B3
мне надо сформировать строку без пробелов, переходов каретки, так сказать чисто символы!
p=""
For I = 1 To Len(memo.value)
If Mid$(memo.value, I, 1) <> " " Then p = p + Mid$(memo.value, I, 1)
Next I
Так я убераю пробелы, возможно ли также убирать Энтеры (переводы кареток), или мне придётся каждый символ проверять эта цифра или латинская буква, и ничто иное... подскажите как проще....

Решение задачи: «Убрать символ перевода каретки»

textual
                            Листинг программы 
                        

                            <font color="blue">For</font> I = <font color="darkblue"><b>1</b></font> <font color="blue">To</font> Len(ff)
<font color="blue">If</font> Asc(<font color="blue">Mid</font>$(ff, I, <font color="darkblue"><b>1</b></font>)) <> <font color="darkblue"><b>32</b></font> <font color="blue">And</font> Asc(<font color="blue">Mid</font>$(ff, I, <font color="darkblue"><b>1</b></font>)) <> <font color="darkblue"><b>13</b></font> <font color="blue">And</font> Asc(<font color="blue">Mid</font>$(ff, I, <font color="darkblue"><b>1</b></font>)) <> Chr(<font color="darkblue"><b>10</b></font>) <font color="blue">Then</font> p = p + <font color="blue">Mid</font>$(ff, I, <font color="darkblue"><b>1</b></font>)
<font color="blue">Next</font> I
                        