vbs計算字串在乙個文字中出現次數的函式

2021-06-16 09:44:20 字數 539 閱讀 6557

給出乙個應用vbs計算字串在乙個文字中出現次數的函式,如下所示

'str:字串內容

'tosearch:需要查詢的字元或字串

function findcount(str,tosearch)

dim times,wordlen

times = 0

wordlen = len(tosearch)

for i = 1 to len(str)+1-wordlen

if mid(str,i,wordlen) = tosearch then

times = times + 1

end if

next

findcount = times

end function

'查詢"as"在字串"adfasdfasdfasdfasdfasdfasdfa"中出現的次數

msgbox findcount("adfasdfasdfasdfasdfasdfasdfa","as")

彈出框結果:6 ,有興趣的可以將**拷出來在qtp或其它工具中執行一下。

vbs計算字串在乙個文字中出現次數的函式

給出乙個應用vbs計算字串在乙個文字中出現次數的函式,如下所示 str 字串內容 tosearch 需要查詢的字元或字串 function findcount str,tosearch dim times,wordlen times 0 wordlen len tosearch for i 1 to...

獲取乙個字串在乙個長字串中出現的次數

獲取乙個字串 kk 在乙個長字串中出現的次數 思路 1 定義乙個計數器 2 獲取 kk 第一次出現的位置。3 從第一次出現位置後剩餘的字串中繼續獲取 kk 出現的位置,每獲取一次就計數一次。4當獲取不到時,計數完成,返回計數器的值。public class exercise2 return coun...

在乙個長字串中刪除乙個短字串

輸入兩個字串,從第一字串中刪除第二個字串中所有的字元。例如,輸入 they are students.和 aeiou 則刪除之後的第乙個字串變成 thy r stdnts.這裡注意 從乙個字串中刪除字串的時候,如果是通過刪除乙個字串就移動後面所有的字元,就非常複雜了。通過hash表記錄第二個字串 現...