用字符串函数对字符串进行截头去尾、大小写替换等操作。 函数语法功能LenLen(string|varname)返回字符串内字符的数目,或是存储一变量所需的字节数。TrimTrim(string)将字符串前后的空格去掉LtrimLtrim(string)将字符串前面的空格去掉RtrimRtrim(string)将字符串后面的空格去掉MidMid(string,start,length)从string字符串的start字符开始取得length长度的字符串,如果省略第三个参数表示从start字符开始到字符串结尾的字符串LeftLeft(string,length)从string字符串的左边取得length长度的字符串RightRight(string,length)从string字符串的右边取得length长度的字符串LCaseLCase(string)将string字符串里的所有大写字母转化为小写字母UCaseUCase(string)将string字符串里的所有大写字母转化为大写字母StrCompStrComp(string1,string2[,compare])返回string1字符串与string2字符串的比较结果,如果两个字符串相同,则返回0,如果小于则返回-1,如果大于则返回1InStrInStr(string1,string2
[, compare]
)返回string1字符串在string2字符串中第一次出现的位置SplitSplit(string1,delimiter[, count[, start]
])将字符串根据delimiter拆分成一维数组,其中delimiter用于标识子字符串界限。如果省略,使用空格("")作为分隔符。
count 返回的子字符串数目,-1 指示返回所有子字符串。
start为 1 执行文本比较;如果为 0 或者省略执行二进制比较。
Replace(expression, find, replacewith[, compare[, count[, start]]])
返回字符串,其中指定数目的某子字符串(find)被替换为另一个子字符串(replacewith)。
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
包含" 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
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
稳了!魔兽国服回归的3条重磅消息!官宣时间再确认!
昨天有一位朋友在大神群里分享,自己亚服账号被封号之后居然弹出了国服的封号信息对话框。
这里面让他访问的是一个国服的战网网址,com.cn和后面的zh都非常明白地表明这就是国服战网。
而他在复制这个网址并且进行登录之后,确实是网易的网址,也就是我们熟悉的停服之后国服发布的暴雪游戏产品运营到期开放退款的说明。这是一件比较奇怪的事情,因为以前都没有出现这样的情况,现在突然提示跳转到国服战网的网址,是不是说明了简体中文客户端已经开始进行更新了呢?
更新日志
- 小骆驼-《草原狼2(蓝光CD)》[原抓WAV+CUE]
- 群星《欢迎来到我身边 电影原声专辑》[320K/MP3][105.02MB]
- 群星《欢迎来到我身边 电影原声专辑》[FLAC/分轨][480.9MB]
- 雷婷《梦里蓝天HQⅡ》 2023头版限量编号低速原抓[WAV+CUE][463M]
- 群星《2024好听新歌42》AI调整音效【WAV分轨】
- 王思雨-《思念陪着鸿雁飞》WAV
- 王思雨《喜马拉雅HQ》头版限量编号[WAV+CUE]
- 李健《无时无刻》[WAV+CUE][590M]
- 陈奕迅《酝酿》[WAV分轨][502M]
- 卓依婷《化蝶》2CD[WAV+CUE][1.1G]
- 群星《吉他王(黑胶CD)》[WAV+CUE]
- 齐秦《穿乐(穿越)》[WAV+CUE]
- 发烧珍品《数位CD音响测试-动向效果(九)》【WAV+CUE】
- 邝美云《邝美云精装歌集》[DSF][1.6G]
- 吕方《爱一回伤一回》[WAV+CUE][454M]