如何检测字符串出现的次数

CheckTheChar（thechar函数，字符串）
thechar =检测的字符串。
弦=被检测到的字符串。
如果仪器（string，然后TheChar）
N = 1 Len（字符串）
如果mid（字符串，n，Len（thechar））= thechar然后
checkthechar = checkthechar + 1
最后如果
下一个
checkthechar = 这个字checkthechar倍
其他的
checkthechar =0倍
最后如果
端功能