如题

解决方案 »

  1.   

    str=replace(str,chr(13))
    str=replace(str,chr(10))
      

  2.   

    str=replace(str,chr(13),"")
    str=replace(str,chr(10),"")
      

  3.   

    replace(str,chr(13),"")
    replace(str,chr(10),"")
      

  4.   

    新建工程添加2个COMMAND和一个TEXT,把text的multiline设置true
    Private Sub Command1_Click()
    Text1.Text = Replace(Text1.Text, Chr(10), "a")
    End SubPrivate Sub Command2_Click()
    Text1.Text = Replace(Text1.Text, Chr(10), "a")
    End Sub
      

  5.   

    不好意思,呵呵~
    Private Sub Command2_Click()
    Text1.Text = Replace(Text1.Text, Chr(13), "b")
    End Sub
      

  6.   

    strData = Replace(strData, vbNewline, "")
      

  7.   

    这么多人抢呀呵呵
    replace(Str,vbcrlf,"")
    这个就可以了
      

  8.   

    这么多人抢呀呵呵
    replace(Str,vbcrlf,"")
    这个就可以了
      

  9.   

    这么多人抢呀呵呵
    replace(Str,vbcrlf,"")
    这个就可以了
    --------------
    转自楼上的楼上,版权是他的,这个是引用!
      

  10.   

    Text1.Text = Replace(Text1.Text, (Chr(13)), "")
      

  11.   

    一个字符串变量的值是用GetPrivateProfileString从INI文件中读出来的,但是用replace还是去不掉,我觉得它在字符串变量中已经不再是回车换行符了,它的长度是1
      

  12.   

    100分呢,不枪白不枪,嘻嘻replace(str,chr(13),"")
    replace(str,chr(10),"")
      

  13.   

    我不抢.我用trim() 哈哈,不过是delphi的 不知道VB有没有