以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  判断汉字  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=171513)

--  作者:rjh4078
--  发布时间:2021/9/1 17:07:00
--  判断汉字
请问有判断一段文字里哪些字符是汉字的方法吗?
--  作者:有点蓝
--  发布时间:2021/9/1 17:16:00
--  
Dim pattern As String = "[^\\u4e00-\\u9fa5]"
Dim txt = "112地方地方好483"
Dim str = System.Text.RegularExpressions.Regex.Replace(txt , pattern ,"")
Output.Show(str)

--  作者:rjh4078
--  发布时间:2021/9/1 19:01:00
--  
多谢老师
--  作者:rjh4078
--  发布时间:2021/9/2 7:56:00
--  
再请教下老师 如果是判断英文怎么改呢?
--  作者:chen37280600
--  发布时间:2021/9/2 8:48:00
--  
[总结分享]正则表达式的使用,含匹配验证、提取过滤,常见公式分享,复制即用!过滤中文、大小写英文、数字、标点符号、换行符... 
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=159568&replyID=&skin=1
[此贴子已经被作者于2021/9/2 8:48:33编辑过]

--  作者:rjh4078
--  发布时间:2021/9/2 10:56:00
--  
多谢杰哥
--  作者:rjh4078
--  发布时间:2021/9/2 11:12:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20210902111100.png
图片点击可在新窗口打开查看

跟预期的不一样啊

--  作者:有点蓝
--  发布时间:2021/9/2 11:30:00
--  
Dim pattern As String = "[\\u4e00-\\u9fa5]"
Dim txt = "112地方地方好483"
Dim str = System.Text.RegularExpressions.Regex.Replace(txt , pattern ,"")
Output.Show(str)

--  作者:rjh4078
--  发布时间:2021/9/2 18:49:00
--  
多谢蓝版  我的意思是根据杰哥提供的正则表达式想获取英文不行啊
--  作者:有点蓝
--  发布时间:2021/9/2 20:15:00
--  
网上搜索先学学正则的语法,如果不理解,只会抄是没有用的