vbs 函數獲取數組字符串的最后一個LastOne 挺方便的

2019-10-26 18:02:44

字體：大中小

來源：轉載

供稿：網友

將下面的代碼直接保存為jb51.vbs運行即可。
復制代碼代碼如下:

Function LastOne(Str,splitStr)
'輸入字符和分隔符，得到最后一部分
LastOne = right(Str,len(Str)-InStrRev(Str,splitStr))
End Function
msgbox LastOne("1,2,3", ",")

其實在實際應用中多用數組實現，這樣的效率對于大量的字符串來說，效率有點低了。

'msgbox InStrRev("1,2,3", ",")=4
InStrRev 返回某字符串在另一個字符串中最后出現的位置。
用數組的實現方法如下：
復制代碼代碼如下:

Function jb51(Str,splitStr)
'輸入字符和分隔符，得到最后一部分
strarr=split(Str,splitStr)
lens=ubound(strarr)
'獲取數組的長度
jb51 = strarr(lens)
End Function
msgbox jb51("1,2,3", ",")

您可能感興趣的文章:

javascript 獲取元素位置的快速方法 getBoundingClientRect()javascript的原生方法獲取數組中的最大(最小)值php數組函數序列之each() - 獲取數組當前內部指針所指向元素的鍵名和鍵值，并將指針移到下一位php數組函數序列之array_values() 獲取數組元素值的函數與方法php數組函數序列之array_keys() - 獲取數組鍵名js獲取數組任意個不重復的隨機數組元素PHP獲取數組中某元素的位置及array_keys函數應用

上一篇：腳本 MsAgent組件微軟精靈揪出系統自帶的寵物

下一篇：vbs 更改環境變量