asp之字符串函数示例(2)

Dim MyVarMyVar = LTrim("  vbscript ")  'MyVar 包含 "vbscript "。MyVar = RTrim("  vbscript ")  'MyVar 包含 "  vbscript"。MyVar = Trim("  vbscript ")   'MyVar 包含"vbscript"。

3、Mid函数示例：

下面的示例利用 Mid 函数返回字符串中从第四个字符开始的六个字符：

Dim MyVarMyVar = Mid("VB脚本is fun!", 4, 6) 'MyVar 包含 "Script"。

4、Left函数示例：

下面的示例利用Left 函数返回MyString 的左边三个字母：

Dim MyString, LeftStringMyString = "VBSCript"LeftString = Left(MyString, 3) 'LeftString 包含 "VBS

5、Right函数示例：

下面的示例利用 Right 函数从字符串右边返回指定数目的字符：

Dim AnyString, MyStrAnyString = "Hello World"      '定义字符串。MyStr = Right(AnyString, 1)    '返回 "d"。MyStr = Right(AnyString, 6)    ' 返回 " World"。MyStr = Right(AnyString, 20)   ' 返回 "Hello World"。6、LCase函数示例：

下面的示例利用 LCase 函数把大写字母转换为小写字母：

Dim MyStringDim LCaseStringMyString = "VBSCript"LCaseString = LCase(MyString) ' LCaseString 包含 "vbscript"。7、 UCase函数示例：

下面的示例利用 UCase 函数返回字符串的大写形式：

Dim MyWordMyWord = UCase("Hello World")    ' 返回"HELLO WORLD"。

8、StrComp函数示例：

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

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