VB中操作Word文档一问

[ytony]

有一个Word文件，其内容是从网页上复制并粘贴的，因而格式比较乱。
一个自然段还没有结束，但段间已经有好几个回车符了。对于一个正常
的自然段，段的首行都是以4个空格字符开始。下面是一个例子：

-----------------------------------------------------------------
年轻人！扶你的祖母一把！在外出时，为她探看前面的路,[CR]
预警每一块不平的地面，并为她推开厚重的门，说："小心！[CR]
别辗了手！该带的东西带了吗？"如同老人家以前对你说的一般。[CR]
　　这样，你就真正地成熟了。而且老一辈也便可以安然地离去，[CR]
因为留在你心中的，是他们不朽的精神形象，而非暂时的肉体衰逝！[CR]
-----------------------------------------------------------------

其中[CR]表示一个回车符。实际上该例子中只有两个段落，但直接复制、
粘贴到Word中时，就成了5个段落。

我想请教一下，能否用VB编一个程序，直接操作Word文档，将其中多余的
回车符删掉，但保留其他的所有信息（如文本格式、图片等）

Thx！

[tiger322]

先把文件读入到strWord变量中
然后：
strWord = Replace(strWord,vbcrLf,"")'替换掉所有的回车，包括正常的自然段
strWord = Replace(strWord," ",vbCrLf & " ")'在每个段开始之前加一个回车

[flc]

关注

[ytony]

谢谢！
这个我知道，问题是如何做到只删除多余的回车符，但确保其他的所有信息（如文本格式、图片等）不变？

[aha99]

楼上给出的答案可行啊

[6742]

是不是先将回车都读出来，删除!然后将四个空格全部用回车和四个空格代替。