以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  某一个字符在字符串中出现次数  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=172626)
--  作者：cd_tdh
--  发布时间：2021/10/22 15:24:00
--  某一个字符在字符串中出现次数

老师，怎么判断某一个字符在一个字符串中出现的次数?，

比如：Dim Str1 As String = "人民警察为人民，人民警察人民爱"，判断出现“人民”的次数
--  作者：jialihaha
--  发布时间：2021/10/22 15:28:00
--  
Dim Str1 As String = "人民警察为人民,人民警察人民爱"
output.Show(Str1.Split("人民").Length-1)
--  作者：cd_tdh
--  发布时间：2021/10/22 15:33:00
--  
谢谢！
--  作者：有点蓝
--  发布时间：2021/10/22 15:51:00
--  
Dim Str1 As String = "人民警察为人民,人2民警察人民爱"
output.Show(Str1.replace("人民","@").Split("@").Length-1)
--  作者：y2287958
--  发布时间：2021/10/22 15:52:00
--  
2楼代码不准确，因为Split匹配的单个字符。
用以下代码：
Dim Str1 As String = "人民警察为人民,人民警察人民爱"
Dim Str2 As String = "人民"
output.Show((len(Str1) - len(Str1.Replace(Str2,""))) / len(Str2))