好得很程序员自学网

<tfoot draggable='sEl'></tfoot>

如何检测字符串出现的次数?_编程10000问_

NEWSZW_HZH_BEGIN-->

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

Function CheckTheChar(TheChar,TheString)
' TheChar=" 要检测的字符串 ".
' TheString=" 待检测的字符串 ".
if inStr(TheString,TheChar) then
for n =1 to Len(TheString)
if Mid(TheString,n,Len(TheChar))=TheChar then
CheckTheChar=CheckTheChar+1
End if
Next
CheckTheChar=" 这个字符 "&CheckTheChar&" 次 "
else
CheckTheChar="0 次 "
end if
End Function

 

NEWSZW_HZH_END-->

查看更多关于如何检测字符串出现的次数?_编程10000问_的详细内容...

  阅读:40次