如何去掉字符串中的换行!

Question

有一个文本中,某一字符串有回车 如
<td height="25" bgcolor="e6e6e6">联系地址</td>
<td height="25" bgcolor="ffffff">北京</td>
现在我想去掉回车,变成类似的字符串
<td height="25" bgcolor="e6e6e6">地址</td><td height="25" bgcolor="ffffff">北京</td>
本人初次接触vb,望各位帮忙.

Answer 1

str = Replace(str, Chr(13)
str就是你需要的字符！！

Answer 2

最好先用二进制编辑器看看那些文本的换行方式，说不定除了chr（13）以外还会有一个chr（10）

Answer 3

同上
你是要为html文件减肥吗？

Answer 4

strTemp=Replace(strTemp, Chr(13), "")

Answer 5

嘿嘿，前面说同上的都错啦：
仔细看看他写的是什么 str = Replace(str, Chr(13)    '好像少了点什么吧，呵呵MyString=Replace(MyString, Chr(13), "")如rainstormmaster(暴风雨 v2.0)所说，我以前也用过这个给HTML减肥，
还有些网站用FLASHGET下载所有连接，里面的超连接都是绝对地址，可以把超连接都改成相对地址，这个函数就派上大用了。呵呵

Answer 6

对了，还有件事要提醒一下：
如果是在DOS中使用输出定向得到的文本换行符号不是CHR(13)而是CHR(10)

Answer 7

//嘿嘿，前面说同上的都错啦晕,我说的同上是同lsftest() ,事实上,楼主给出的字串还包含很多无用的空格,这个也要去掉

Answer 8

要习惯使用常数，这样代码容易看懂些strTemp=Replace(strTemp, vbCrLf, vbNullString)
strTemp=Replace(strTemp, vbCr, vbNullString)
strTemp=Replace(strTemp, vbLf, vbNullString)

Answer 9

//事实上,楼主给出的字串还包含很多无用的空格,这个也要去掉这个也可以用Replace办到，把下面那行语句放在循环中就行了（循环的结束条件是strTemp长度不再发生改变）
strTemp=Replace(strTemp, String$(2, vbSpace), vbSpace)