vbs 函數(shù) 獲取數(shù)組字符串的最后一個LastOne 挺方便的
來源：本站原創(chuàng)|時間：2020-01-10|欄目：vb|點擊： 次
將下面的代碼直接保存為jb51.vbs運行即可。
復(fù)制代碼 代碼如下:
Function LastOne(Str,splitStr)
'輸入字符和分隔符，得到最后一部分
LastOne = right(Str,len(Str)-InStrRev(Str,splitStr))
End Function
msgbox LastOne("1,2,3", ",")
其實在實際應(yīng)用中多用 數(shù)組實現(xiàn)，這樣的效率對于大量的字符串來說，效率有點低了。
'msgbox InStrRev("1,2,3", ",")=4
InStrRev 返回某字符串在另一個字符串中最后出現(xiàn)的位置。
用數(shù)組的實現(xiàn)方法如下：
復(fù)制代碼 代碼如下:
Function jb51(Str,splitStr)
'輸入字符和分隔符，得到最后一部分
strarr=split(Str,splitStr)
lens=ubound(strarr)
'獲取數(shù)組的長度
jb51 = strarr(lens)
End Function
msgbox jb51("1,2,3", ",")
您可能感興趣的文章
- 01-10下載文件到本地運行的vbs
- 01-10VBS中的正則表達式的用法大全 <font color=red>原創(chuàng)&
- 01-10VBS中SendKeys的基本應(yīng)用
- 01-10VBScript教程 第十一課深入VBScript
- 01-10用VBSCRIPT控制ONSUBMIT事件
- 01-10VBScript語法速查及實例說明
- 01-10VBS中Select CASE的其它用法
- 01-10VBScript教程 第七課使用條件語句
- 01-10vbscript 可以按引用傳遞參數(shù)嗎？
- 01-10VBScript教程 第二課在HTML頁面中添加VBscript代碼
閱讀排行
本欄相關(guān)
- 01-10下載文件到本地運行的vbs
- 01-10飄葉千夫指源代碼，又稱qq刷屏器
- 01-10SendKeys參考文檔
- 01-10什么是一個高效的軟件
- 01-10VBS中的正則表達式的用法大全 &l
- 01-10exe2swf 工具(Adodb.Stream版)
- 01-10VBS中SendKeys的基本應(yīng)用
- 01-10用VBSCRIPT控制ONSUBMIT事件
- 01-10VBScript教程 第十一課深入VBScript
- 01-10VBScript語法速查及實例說明
隨機閱讀
- 01-11Mac OSX 打開原生自帶讀寫NTFS功能(圖文
- 08-05DEDE織夢data目錄下的sessions文件夾有什
- 01-10delphi制作wav文件的方法
- 01-10SublimeText編譯C開發(fā)環(huán)境設(shè)置
- 08-05織夢dedecms什么時候用欄目交叉功能？
- 08-05dedecms(織夢)副欄目數(shù)量限制代碼修改
- 01-11ajax實現(xiàn)頁面的局部加載
- 01-10C#中split用法實例總結(jié)
- 01-10使用C語言求解撲克牌的順子及n個骰子
- 04-02jquery與jsp,用jquery