小弟我怎么才能把回车符取消掉呢?关于字符比较如下

我如何才能把回车符取消掉呢?关于字符比较如下
有源字符ab
和目标字符
a
b
对于源字符的长度为2,目标字符长度为4.但我用下面的语句去取时,当目标字符loops为3时出现了无效的调动或参数的提示

lens   =   Len(Trim(erpstr))
For   loops   =   1   To   lens
If   Asc(Mid(erpstr,   loops,   1))   <>   13   And   Asc(Mid(erpstr,   loops,   1))   <>   10   Then
        origstr   =   origstr   +   Mid(erpstr,   loops,   1)
End   If
Next

thanks

[解决办法]
Print Replace(erpstr, vbCrLf, " ")
将回车符替换为 " "