vbs文本处理函数

VBScript Language Reference   http://msdn.microsoft.com/library/d1wf56tt.aspx

1 TRim/LTrim/RTrim

定义和用法：

去除字符串前后的空格。

语法

LTrim(string) '除去字符串左边空格 RTrim(string) '除去字符串右边空格 Trim(string)  '除去字符串两边空格

脚本实例：

Dim a,b
a = "                  LTrim"
b = LTrim(a)
Wscript.Echo "it is before:"+a
Wscript.Echo "it is now:"+b

执行结果：

使用前使用LTrim后

2 Split

定义和用法：

Split函数经常会被使用在分割某个带有分割符号的字符串,其返回值为一个标准数组。

语法

Split(expression[,delimiter[,count[,compare]]])

参数	描述
expression	必需的。包含子字符串和分隔符的字符串表达式。
delimiter	可选的。用于识别子字符串界限的字符。默认是空格字符。
count	可选的。需被返回的子字符串的数目。-1 指示返回所有的子字符串。
compare	可选的。规定要使用的字符串比较类型。 可采用下列的值： 0 = vbBinaryCompare - 执行二进制比较。 1 = vbTextCompare - 执行文本比较。

脚本实例：

Dim str,arr
str = "baidu.com,google.com,sina.com"
'利用逗号为分隔符进行拆分
arr = Split(str,",",-1,1)
'遍历数组的所有内容
For Each a In arr
MsgBox a

执行结果：

，，

3 mid/midb

定义和用法：

从字符串中返回指定数目的字符

语法

mid(string,start[,length])

参数	描述
string	必须的。字符串表达式，从中返回字符。如果 字符串是 Null，则返回 Null。
start	必须的。字符串中被提取的字符部分的开始位置。如果 start 超过了字符串中字符的数目，函数将返回零长度字符串 ("")。
length	可选的。需被返回的字符数目。省略或 length 超过字符串的字符数（包括 start 处的字将返回字符串中从 start开始的字符 到字符串末尾的所有字符。

脚本实例：

Dim str
str = "aabbccdd"
str = mid(str,3,4)
MsgBox str

执行结果：

bbcc

注意：midb()是字节数为单位而不是以字符数单位工作的。

4 StrReverse