计算一个字符串在另一字符串中出现的次数函数


Function strnum(patrn, strng)
Dim regEx, Match, Matches,xx
xx=0
Set regEx = New RegExp
regEx.Pattern = patrn
regEx.IgnoreCase = True ' 设置是否区分大小写。
regEx.Global = True
Set Matches = regEx.Execute(strng)
For Each Match in Matches
xx=xx+1
Next
strnum = xx
End Function



相关阅读:
How AdSense ads are ranked on your site
CSS3教程(10):CSS3 HSL声明设置颜色
负边距创建自适应宽度的流体布局的实现方法
PHP下判断网址是否有效的代码
Linux下配置NTP 架设本地时间服务器
把wordpress生成缩略图功能去掉
Php 构造函数construct的前下划线是双的_
windows系统自带杀毒工具
用javascript来实现select标签的美化的代码
asp防止刷新功能实现代码
javascript获取随机整数
叶子asp分页类
quagga做BGP实验ubuntu
ASP.NET教程:eval()函数详解
快速导航

Copyright © 2016 phpStudy |