asp字符串函数 |
1、Len函数示例: 下面的示例利用 Len 函数返回字符串中的字符数目: Dim MyStringMyString = Len("VBSCRIPT") 'MyString 包含 8。2、Trim、Ltrim、Rtrim函数示例: 下面的示例利用 LTrim, RTrim, 和 Trim 函数分别用来除去字符串开始的空格、尾部空格、 开始和尾部空格: Dim MyVarMyVar = LTrim(" VBScript ") 'MyVar 包含 "vbscript "。MyVar = RTrim(" vbscript ") 'MyVar asp 字符串转数组包含 " 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, 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 |
版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。
发表评论