正则表达式在VFP中BROWSE中的简单应用

正则表达式 | 2017-11-17 20:26:10 | 阅读 1482 次 | 评论(0)


查找出 XM 字段中除汉字以外的字符,并替换掉这些字符。
CREATE CURSOR tt (xm c(10),xm1 c(10))
INSERT INTO tt (xm) VALUES ("河南\省")
INSERT INTO tt (xm) VALUES ("河-北省")
INSERT INTO tt (xm) VALUES ("北,22京市")
INSERT INTO tt (xm) VALUES ("上海市")
INSERT INTO tt (xm) VALUES ("西安市")
re = Createobject("VBScript.RegExp")
re.Global = .T.
re.Ignorecase = .T.
re.Pattern = "[^\u4e00-\u9fa5]"
BROWSE FOR xm!=re.replace(xm,"")
REPLACE ALL xm1 WITH re.replace(xm,"")
BROWSE 
文章评论,共0条
游客请输入验证码
浏览233981次
最新评论
  • cstdio:ooooooo
  • sdta:从VFP入手也不错
  • yuanhouwen:尊敬的sdta大神:作为一个编程外行,看到你关于操控EXCEL的编程程序我觉得特别神奇,想向你...