包含
"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, 0) '返回-1。MyComp = StrComp(MyStr2, MyStr1) '返回1。
9、InStr示例：
下面的示例利用 InStr 搜索字符串：
Dim SearchString, SearchChar, MyPosSearchString ="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
