如何檢測(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)文章
如何讓用戶也能修改密碼？...2006-11-11
如何判斷發(fā)言是否為空？...2006-11-11
如何將訪問者數(shù)目周期性地保存？...2006-11-11
如何在線查詢本地機(jī)的文件？...2006-11-11
如何顯示一個(gè)文本文件？...2006-11-11
如何正確顯示數(shù)據(jù)庫(kù)里同時(shí)存在的GB碼和BIG5碼？
如何正確顯示數(shù)據(jù)庫(kù)里同時(shí)存在的GB碼和BIG5碼？...2006-11-11
如何用ASP輸出HTML文件？...2006-11-11
如何動(dòng)態(tài)添加Form項(xiàng)？
如何動(dòng)態(tài)添加Form項(xiàng)？...2006-11-11
如何提示用戶打開Cookie？...2006-11-11
如何讀取一個(gè).ini文件？...2006-11-11