手机
当前位置:查字典教程网 >脚本专栏 >vbs >vbs 函数 获取数组字符串的最后一个LastOne 挺方便的
vbs 函数 获取数组字符串的最后一个LastOne 挺方便的
摘要:将下面的代码直接保存为jb51.vbs运行即可。复制代码代码如下:FunctionLastOne(Str,splitStr)'输入字符和分隔...

将下面的代码直接保存为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", ",")

【vbs 函数 获取数组字符串的最后一个LastOne 挺方便的】相关文章:

vbs实现的保存剪贴板中的文本并编辑或保存

vbs中使用 ADO 读取所有数据均在一行上的文本文件的代码

dim函数第三个参数设置截取字符的长度问题

vbs字符串操作小考题

用vbs判断系统补丁的脚本

用vbs模拟的一个asp的分页显示功能

[vbs]每一行的最后一个字符转换成_

使用VBS获取当前日期的前一天 并修正输出格式

用vbs判断一个日期是否在指定的时段内

用vbs实现防止计算机使用 LMHosts 文件

精品推荐
分类导航