以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何统计字符串中汉字个数？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=104098)
--  作者：chenkun
--  发布时间：2017/7/23 15:26:00
--  如何统计字符串中汉字个数？
例如有字符串：型号为abc455型。如何统计这字符串中的汉字个数？另外有一字符串：型号为345型号；如何对这两字符传进行比对，超出差别？
--  作者：有点甜
--  发布时间：2017/7/23 17:03:00
--  

 不明白你的意图。统计汉字个数这样写

 

Dim str As String = "型号为abc455型"
str = System.Text.RegularExpressions.Regex.Replace(str, "[^\\u4e00-\\u9fa5]", "")
msgbox(str)
msgbox(str.length)
--  作者：chenkun
--  发布时间：2017/7/24 17:10:00
--  

如何让变量 str 引用表A的值，例如表A第四列的值
--  作者：有点甜
--  发布时间：2017/7/24 17:23:00
--  

datacolchanged事件

 

If e.DataCol.name = "第四列" Then
    Dim str As String = e.DataRow("第四列")
    str = System.Text.RegularExpressions.Regex.Replace(str, "[^\\u4e00-\\u9fa5]", "")
    msgbox(str)
    msgbox(str.length)
End If