国产探花免费观看_亚洲丰满少妇自慰呻吟_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

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板： 南昌县| 从化市| 正安县| 新兴县| 隆昌县| 谢通门县| 左权县| 龙岩市| 敖汉旗| 新昌县| 桐梓县| 汝阳县| 米易县| 晋城| 育儿| 台南县| 宜川县| 荃湾区| 姚安县| 白玉县| 盐源县| 汨罗市| 永吉县| 水富县| 济宁市| 二连浩特市| 康保县| 民勤县| 衡南县| 琼结县| 大新县| 景洪市| 花莲县| 鄂托克旗| 乌兰浩特市| 西城区| 新营市| 城口县| 新竹县| 化德县| 廉江市|