1、查找替换法。打开“编辑”菜单中的“替换”对话框，把光标定位在“查找内容”输入框中，单击“高级”按钮，选择“特殊字符”中的“段落标记”两次，在输入框中会显示“^P^P”，然后在“替换为”输入框中用上面的方法插入一个“段落标记”（一个“^P”），再按下“全部替换”按钮。这样多余的空行就会被删除。
2、程序法。用Word打开含空行的文章，依次单击“工具” →“宏” →“Visual Basic编辑器”，打开Visual Basic编辑器。双击“Project”下的“ThisDocument”，打开“代码”输入窗口，将下面的代码输入进去，并保存。
Sub cutPar()
Dim i As Paragraph, n As Integer
ApplicationScreenUpdating = False
For Each i In ActiveDocumentParagraphs
If Len(iRange) = 1 Then
iRangeDelete
n = n + 1
End If
Next
MsgBox "共删除空白段落" & n & "个"
ApplicationScreenUpdating = True
End Sub呵呵给你个好玩的思路别人的程序都用了循环,如果字符串很大,或是最右边的换行符超多,可能循环次数就会比较多,我的不管有多长,只要5下就清空,代码如下:
Dim
a$
a
=
"a
a"
&
vbCrLf
&
"bb"
&
vbCrLf
&
"fdas"
&
vbCrLf
&
vbCrLf
&
vbCrLf
a
=
Replace(a,
"
",
"vb妮可")
a
=
Replace(a,
vbCrLf,
"
")
a
=
RTrim(a)
a
=
Replace(a,
"
",
vbCrLf)
a
=
Replace(a,
"vb妮可",
"
")
我的思路就是:
1将原串中的空格都先替换成奇怪的短串,这样你的字符串中就没有空格了
2然后将所有的换行符都换成空格
3VB有一个删除右边空格的函数RTrim,可以把右边的空格都清除
4没有删除的空格就是符合你要求的换行了,再替换回换行符
5将奇怪的短串还原成空格
完成如果用Replace Pioneer,把
(\s
)+替换成
就可以了。步骤:
1 ctrl-o打开txt文件
2 ctrl-h打开replace窗口
3 在Search for Pattern和Replace with Pattern分别输入
(\s
)+和
然后点击Replace即完成。
如果你坚持用UE,那么把[^p]+替换成^p就可以了。
不建议用不太标准的东西，一定要在UE里用正则最好打开菜单"高级-〉配置-搜索-〉正则表达式"，把"perl兼容的正则表达式"选中，这样就可以支持标准的正则了。
这样就把
(\s
)+替换成
,可以去掉任何只由换行符和空格组成的行。<!DOCTYPE html>
<html>
<head>
<meta charset="utf-8">
<script type="text/javascript">
windowonload = function(){
var s ="<html>\n"
+"<body>\n"
+" \n"
+"<div>\n"
+"123\n"
+" \n"
+"</div>\n"
+" \n"
+"</body>\n"
+" \n"
+"</html>";
var str = sreplace(/(\s+\n+|\n+|\s+|\n+\s+)/g,"");
consolelog(str);
var str = strreplace(/></g,">\n<");
consolelog(str);
var str = strreplace(/>\S+</g,function(world){
return ">\n"+worldsubstring(1,worldlength-1)+"\n<";
});
consolelog(str);
documentgetElementById("msg")innerText = str;
}
</script>
<style type="text/css">
msg{
width: 100%;
height: 60px;
color:#FBBDEE;
}
</style>
</head>
<body>
<div id="msg" class="msg"></div>
</body>
</html>
不知道适不适合你的要求。个人觉得是可以满足的。
用在DW里搜索：$nbsp=' ';
找到后改为：$nbsp='';
也就是删掉里面的两个空格:  
然后在DW里搜索： $ok='<br>';
找到后改为：$ok='';
也就是删掉引号里的<br>换行符
这样，在网站生成静态页面时，下载地址的代码里面就不会有多余的空格和换行符了．就像这样把 文件html的源代码如下：<html<head<title</title</head<body <table</table</body</html经过空格和换行过滤后得到的应该是只有一行，如下:解决办法： 1、清除多余的空格（点一下显示比例旁边的一个按钮即可显示，下同） 空格可以全部替换为空（去掉） 1）注意有两种空格，英文的小点和中文的方框将其复制， 2）然后编辑－查找，用Ctrl+V粘贴到查找后面 替换中的内容为空 3）“全部替换” 2、清除多余的回车键（即段落标记） 首先看一下规律，一个段落后有几个回车键以两个回车键为例， 1）编辑－查找，输入^p^p 2) 点“替换”，输入^p 3）点“全部替换” 3、将人工换行符（即向下的箭头）变为段落标记 1）编辑－查找，输入＾l 2) 点“替换”，输入^p 3）点“全部替换” 4、修改段落格式 1）选中相应文字，格式－段落 2）特殊格式，首行缩进 2字符 3）段前 段后 0行 4）设置适当的行距 5）将“如果”前面的勾去掉 6）确定 其他的情况可结合上面的方法灵活处理。]
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）