返回除汉字以外的所有字符

正则表达式 | 2019-05-03 21:45:51 | 阅读 241 次 | 评论(0)
cStr = "中华人民共和国美335*226利坚合众MF-335国大不7*3列颠"
re = Createobject("VBScript.RegExp")
re.Global = .T.
re.Ignorecase = .T.
re.Pattern = "[\u4e00-\u9fa5]"
**********************************
* 下面代码,返回所有汉字 *
*re.Pattern = "[^\u4e00-\u9fa5]"
****************************
?re.replace(cStr,"")
文章评论,共0条
游客请输入验证码
浏览234342次
最新评论
  • cstdio:ooooooo
  • sdta:从VFP入手也不错
  • yuanhouwen:尊敬的sdta大神:作为一个编程外行,看到你关于操控EXCEL的编程程序我觉得特别神奇,想向你...