正则表达式删除文本内容中的空行

正则表达式 | 2017-11-07 11:21:04 | 阅读 777 次 | 评论(0)
* 删除没有空格的空行
clear
cchr=chr(10)+chr(13)
cstr="111111"+replicate(cchr,3)+"222222"+replicate(cchr,5)+"3333333"+replicate(cchr,10)+"4444"
?"====="
?cstr
re = Createobject("VBScript.RegExp")
re.Global = .T.
re.Ignorecase = .T.
re.Pattern = "\r\n" && r 代表回车,n 代表换行
?"====="
?re.replace(cstr, '')
release re

-------------------------------- 作者在 2017-11-07 11:30:49 补充以下内容 --------------------------------

re.Pattern = "\r[\s|]*\n" && r 代表回车,n 代表换行;该代码可以删除带有空格的空行
文章评论,共0条
游客请输入验证码
浏览234015次
最新评论
  • cstdio:ooooooo
  • sdta:从VFP入手也不错
  • yuanhouwen:尊敬的sdta大神:作为一个编程外行,看到你关于操控EXCEL的编程程序我觉得特别神奇,想向你...