prima di inserire

Replace(testo,"
",vbcrlf)

e poi il contrario qndo stampi a video