如何檢測(cè)字符串出現(xiàn)的次數(shù)？
更新時(shí)間：2006年11月16日 00:00:00 作者：
如何檢測(cè)字符串出現(xiàn)的次數(shù)？
Function CheckTheChar(TheChar,TheString)
' TheChar="要檢測(cè)的字符串".
' TheString="待檢測(cè)的字符串".
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="這個(gè)字符"&CheckTheChar&"次"
else
CheckTheChar="0次"
end if
End Function
相關(guān)文章
如何創(chuàng)建一個(gè)PDF文件？...2006-11-11
如何實(shí)時(shí)獲知多少人在線？...2006-11-11
如何讓一個(gè)方框欄內(nèi)的文字滾動(dòng)顯示？
如何讓一個(gè)方框欄內(nèi)的文字滾動(dòng)顯示？...2006-11-11
如何隨機(jī)顯示圖片計(jì)數(shù)器？...2006-11-11
如何動(dòng)態(tài)添加Form項(xiàng)？
如何動(dòng)態(tài)添加Form項(xiàng)？...2006-11-11
如何編寫高質(zhì)量的前端代碼(快手電商前端前端代碼規(guī)范)
這篇文章主要介紹了如何編寫高質(zhì)量的前端代碼,這篇規(guī)范寫的不錯(cuò)！需要的朋友可以參考下2024-02-02
如何防止未經(jīng)注冊(cè)的用戶繞過注冊(cè)界面直接進(jìn)入應(yīng)用系統(tǒng)？
如何防止未經(jīng)注冊(cè)的用戶繞過注冊(cè)界面直接進(jìn)入應(yīng)用系統(tǒng)？...2006-11-11
如何編寫TOP 10之類的排行榜？...
2006-11-11 
如何更好地保護(hù)我的網(wǎng)頁？...
2006-11-11