asp字符串函数及实例

以下是asp字符串函数及实例(vb字符串函数)的讲解与用法，len函数的使用，left函数, instr函数，Split函数的使用等。
用字符串函数对字符串进行截头去尾、大小写替换等操作。

Len
Len(string|varname)
返回字符串内字符的数目，或是存储一变量所需的字节数。

Trim
Trim(string)
将字符串前后的空格去掉

Ltrim
Ltrim(string)
将字符串前面的空格去掉

Rtrim
Rtrim(string)
将字符串后面的空格去掉

Mid
Mid(string,start,length)
从string字符串的start字符开始取得length长度的字符串，如果省略第三个参数表示从start字符开始到字符串结尾的字符串

Left
Left(string,length)
从string字符串的左边取得length长度的字符串

Right
Right(string,length)
从string字符串的右边取得length长度的字符串

LCase
LCase(string)
将string字符串里的所有大写字母转化为小写字母

UCase
UCase(string)
将string字符串里的所有大写字母转化为大写字母

StrComp
StrComp(string1,string2[，compare])
返回string1字符串与string2字符串的比较结果，如果两个字符串相同，则返回0，如果小于则返回-1，如果大于则返回1

InStr
InStr(string1,string2 [, compare] )
返回string1字符串在string2字符串中第一次出现的位置

Split
Split(string1,delimiter [, count[, start] ])

将字符串根据delimiter拆分成一维数组，其中delimiter用于标识子字符串界限。如果省略，使用空格()作为分隔符。 count 返回的子字符串数目，-1 指示返回所有子字符串。 start为 1 执行文本比较；如果为 0 或者省略执行二进制比较。

Replace
Replace ( expression, find, replacewith[, compare[, count[, start]]] )
返回字符串，其中指定数目的某子字符串(find)被替换为另一个子字符串(replacewith)。
以下是这些函数的实例讲解：

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