以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  如何判断一个字符串中都是汉字  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=149845)
--  作者：nuonuo384
--  发布时间：2020/5/13 16:27:00
--  如何判断一个字符串中都是汉字

老师：

麻烦您解答下：

 

 

代码如何判断 一个字符串中都是汉字组成的 ，而没有数字或其他字符？
--  作者：有点蓝
--  发布时间：2020/5/13 16:33:00
--  
Dim pattern As String = "[\\u4e00-\\u9fa5]"
Dim txt = "112地方地方好483"
Dim str = System.Text.RegularExpressions.Regex.Replace(txt , pattern ,"")
if str > "" then msgbox("有其它字符")