以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 返回子字符在字符串中出现的次数 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=154516) |
-- 作者:mxl810823 -- 发布时间:2020/9/17 1:16:00 -- 返回子字符在字符串中出现的次数 如字符串“我爱你FOXTABLE,他妈的我爱你,我爱你爱得要死了。” 求“我爱你”在上面字符串中出现的次数,要怎么写程序
|
-- 作者:y2287958 -- 发布时间:2020/9/17 8:05:00 -- Dim s1 As String ="我爱你FOXTABLE,他*的我爱你,我爱你爱得要死了." Dim s2 As String = "我爱你" Dim s3 As String = s1.Replace(s2,"") Output.Show((len(s1)-len(s3))/len(s2))
|
-- 作者:mxl810823 -- 发布时间:2020/9/17 8:52:00 -- 谢谢了,我以为有专用函数呢,不过这方法也算简单实用 |
-- 作者:有点蓝 -- 发布时间:2020/9/17 9:33:00 -- 没有专门函数 Dim s1 As String ="我爱你FOXTABLE,他*的我爱你,我爱你爱得要死了." msgbox(s1.replace("我爱你","|").Split("|").count - 1)
|