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

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,"")
浏览294131次