VB函数字符串操作函数小结

1、Len函数示例:
下面的示例利用 Len 函数返回字符串中的字符数目:
Dim MyString
MyString = Len("VBSCRIPT") ''MyString 包含 8。

2、Trim、Ltrim、Rtrim函数示例:
下面的示例利用 LTrim, RTrim, 和 Trim 函数分别用来除去字符串开始的空格、尾部空格、 开始和尾部空格:
Dim MyVar
MyVar = LTrim(" vbscript ") ''MyVar 包含 "vbscript "。
MyVar = RTrim(" vbscript ") ''MyVar 包含 " vbscript"。
MyVar = Trim(" vbscript ") ''MyVar 包含"vbscript"。

3、Mid函数示例:
下面的示例利用 Mid 函数返回字符串中从第四个字符开始的六个字符:
Dim MyVar
MyVar = Mid("VB脚本is fun!", 4, 6) ''MyVar 包含 "Script"。

4、Left函数示例:
下面的示例利用Left 函数返回MyString 的左边三个字母:
Dim MyString, LeftString
MyString = "VBSCript"
LeftString = Left(MyString, 3) ''LeftString 包含 "VBS

5、Right函数示例:
下面的示例利用 Right 函数从字符串右边返回指定数目的字符:
Dim AnyString, MyStr
AnyString = "Hello World" ''定义字符串。
MyStr = Right(AnyString, 1) ''返回 "d"。
MyStr = Right(AnyString, 6) '' 返回 " World"。
MyStr = Right(AnyString, 20) '' 返回 "Hello World"。

6、LCase函数示例:
下面的示例利用 LCase 函数把大写字母转换为小写字母:
Dim MyString
Dim LCaseString
MyString = "VBSCript"
LCaseString = LCase(MyString) '' LCaseString 包含 "vbscript"。

7、 UCase函数示例:
下面的示例利用 UCase 函数返回字符串的大写形式:
Dim MyWord
MyWord = UCase("Hello World") '' 返回"HELLO WORLD"。

8、StrComp函数示例:
下面的示例利用 StrComp 函数返回字符串比较的结果。如果第三个参数为 1 执行文本比较;如果第三个参数为 0 或者省略执行二进制比较。

Dim MyStr1, MyStr2, MyComp
MyStr1 = "ABCD": MyStr2 = "abcd" ''定义变量。
MyComp = StrComp(MyStr1, MyStr2, 1) '' 返回 0。
MyComp = StrComp(MyStr1, MyStr2, 0) '' 返回 -1。
MyComp = StrComp(MyStr2, MyStr1) '' 返回 1。

9、InStr示例:
下面的示例利用 InStr 搜索字符串:
Dim SearchString, SearchChar, MyPos
SearchString ="XXpXXpXXPXXP"???
SearchChar = "P"??
MyPos = Instr(SearchString, SearchChar)???''返回 9.
注意:返回的不是一个字符串在另一个字符串中第一次出现的字符位置,而是字节位置。

10、Split函数示例:
Dim MyString, MyArray, Msg
MyString = "VBScriptXisXfun!"
MyArray = Split(MyString, "x",-1,1)
'' MyArray(0) contains "VBScript".
'' MyArray(1) contains "is".
'' MyArray(2) contains "fun!".
Response.Write(MyArray(0))

11、Replace函数示例:
Replace("ABCD", "BC", "12") ''得到A12D[结束]

分享到: 更多
版权申明:

本站保留所有原创文章的版权,本站地址:奔跑的博客[http://www.elecbench.com]

原创文章转载时请注明出处,并添加文章所在页面的链接:http://www.elecbench.com/20/

本站所有 2010年3月4日 以后发表、未标明为“转载”的文章均是本站原创。

发表评论


(设置自己的个性头像)

*

申请属于你的免费顶级域名