Text Area question...

Hello,

Is there an easy solution to replace a 'Line Feed' by a 'backspace' or 'del' inside a TextArea.

if I had this in the text area:
text1
text2
text3

I am expecting this:
text1, text2, text3

I tried this but this is not removing the 'line feed':

Function Formatmyarea()
TMPmyareaFormat$=TextAreaText$( Fieldmyarea )
TMPmyareaFormat$=Replace$(TMPmyareaFormat$,Chr$(13),", ")
SetTextAreaText Fieldmyarea,TMPmyareaFormat$
End Function

oh, I found the solution ...
If you may need that one day...

Function Formatmyarea()
TMPmyareaFormat$=TextAreaText$( Fieldmyarea )
TMPmyareaFormat$=Replace$(TMPmyareaFormat$,Chr$(13)+Chr$(10),", ")
SetTextAreaText Fieldmyarea,TMPmyareaFormat$
End Function

CR LF baby