国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 網站 > 建站經驗 > 正文

判斷字符,串中相同字符的個數

2019-11-02 15:14:00
字體：大 中 小
來源：轉載
供稿：網友

判斷字符串中相同字符的個數

中國古近代歷史研究網站[www.9-39.com]

 =============================
 函 數 名：GetCount
 作    用：判斷字符串中相同字符的個數
 參    數：
 ==============================
 Private Function GetCount(Strs,Word)
  Dim N1,N2,N3
  N1=Len(Strs)
  N2=Len(Replace(Strs,Word,""))
  N3=Len(Word)
  GetCount=Clng(((N1-N2)/N3))
 End Function

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板： 建湖县| 岑溪市| 互助| 金塔县| 龙州县| 北川| 阿拉善左旗| 岱山县| 日土县| 资中县| 通辽市| 湘阴县| 西宁市| 富源县| 鲜城| 南乐县| 高碑店市| 揭东县| 泾川县| 中西区| 全州县| 西宁市| 云安县| 杭州市| 广平县| 图片| 萨迦县| 长汀县| 青河县| 安国市| 滦南县| 香格里拉县| 宣武区| 金沙县| 教育| 祥云县| 陆河县| 叙永县| 砀山县| 延边| 新沂市|