单元格中的字符串有回车符怎么办

主　　题：  单元格中的字符串有回车符怎么办？
作　　者：  shining0219 ()
等　　级：  ^
信 誉 值：  100
所属论坛：  其他开发语言 Office开发/ VBA
问题点数：  20
回复次数：  3
发表时间：  2003-7-18 9:00:06

其中的内容需要做对比判断，如何去除一个字符串中的不可打印字符呢？字符串可能含有中文或日文。

---

---

回复人： icansaymyabc(学习与进步) ( 四级(中级)) 信誉：105 2003-7-18 14:03:45 得分:10

a=range("A1").text
a=replace(a,vbcrlf,"")

回复人： zuing(zuing) ( 一级(初级)) 信誉：100 2003-7-20 16:45:58 得分:10

replace(string,vbcrlf,"")

回复人： shining0219() ( 一级(初级)) 信誉：100 2003-7-29 9:52:08 得分:0

谢谢二位，我是这样做的。

str_ = Trim(str_)
If str_ = "" Then
    MyTrim = ""
    Exit Function
Else
    Do While Asc(Right(str_, 1)) >= 0 And Asc(Right(str_, 1)) <= 31
        str_ = Left(str_, Len(str_) - 1)
        If Len(str_) = 0 Then
            MyTrim = ""
        Exit Function
    End If
    Loop
End If
MyTrim = str_

虽然只考虑了字符串尾部，不过已经够用了。

该问题已经结贴 ，得分记录： icansaymyabc (10)、 zuing (10)、