VB2005使用正规表达式过滤字符串中的非汉字的其它字符
这个一般用正则表达式比较简单，网上有一些匹配汉字的正则表达式，拿来经过改造就能实现我前面的要求。 注释一下，正则表达式[u4e00-u9fa5]表示匹配中文，则正则表达式[^u4e00-u9fa5
这个一般用正则表达式比较简单，网上有一些匹配汉字的正则表达式，拿来经过改造就能实现我前面的要求。
注释一下，正则表达式[u4e00-u9fa5]表示匹配中文，则正则表达式[^u4e00-u9fa5]匹配非中文。用Replace方法将匹配的非中文替换为空字符串，也就是去除了文本中的非中文字符。
Public Function OnlyChinese(ByVal mText As String) As String
Return System.Text.RegularExpressions _
.Regex.Replace(mText, "[^u4e00-u9fa5]", "")
End Function
以上方法整理于网络，本站未测试，不过你可以试一下。
精彩图集
精彩文章