最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线

計(jì)算一個(gè)字符串在另一字符串中出現(xiàn)的次數(shù)函數(shù)

 更新時(shí)間:2008年03月06日 21:37:40   作者:  
計(jì)算一個(gè)字符串在另一字符串中出現(xiàn)的次數(shù)函數(shù)
Function strnum(patrn, strng)
  Dim regEx, Match, Matches,xx
    xx=0
  Set regEx = New RegExp
  regEx.Pattern = patrn
  regEx.IgnoreCase = True            ' 設(shè)置是否區(qū)分大小寫。
  regEx.Global = True
  Set Matches = regEx.Execute(strng)
  For Each Match in Matches
    xx=xx+1
  Next
  strnum = xx
End Function

相關(guān)文章

最新評論

洱源县| 临江市| 余干县| 汝城县| 萝北县| 渝北区| 杭锦后旗| 浦县| 定结县| 南乐县| 宁乡县| 滦南县| 道真| 竹山县| 岳阳县| 河北省| 湖北省| 新民市| 南通市| 柯坪县| 桐梓县| 潼南县| 金乡县| 大冶市| 巫溪县| 临西县| 林甸县| 晋城| 拜泉县| 绥化市| 富裕县| 时尚| 昌江| 龙江县| 板桥市| 博兴县| 永修县| 柞水县| 休宁县| 汉中市| 安远县|