首页 > 代码库 > VB字符串函数集
VB字符串函数集
1. ASC,Chr函数
[说明]：
转换字符字符码
[格式]：
P=Asc(X) 返回字符串X的第一个字符的字符码
P=Chr(X) 返回字符码等于X的字符
[范例]：
(1)P=Chr(65) ‘ 输出字符A,因为A的ASCII码等于65
(2)P=Asc(“A”) ‘ 输出65
2. Len函数
[格式]：
P=Len(X)
[说明]：
计算字符串X的长度，空字符串长度为0，空格符也算一个字符，一个中文字虽然占用2 Bytes，但也算一个字符。
[范例]：
(1) 令X=”” (空字符串)
Len(X) 输出结果为0
(2) 令X=”abcd”
Len(X) 输出结果为4
(3) 令X=”VB教程”
Len(X) 输出结果为4
3. Mid函数
[格式]：
P=Mid(X,n)
由X的第n个字符读起，读取后面的所有字符。
P=Mid(X,n,m)
由X的第n个字符读起，读取后面的m个字符。
[说明]：
读取字符串X中间的字符
[范例]：
(1) X=”abcdefg”
P=Mid(X,5)
结果为：P=”efg”
(2) X=”abcdefg”
P=Mid(X,2,4)
结果为P=”bcde”
4. Replace函数
[格式]：
P=Replace(X,S,R)
[说明]：将字符串X中的字符串S替换为字符串R，然后返回。
[范例]：
X=”VB is very good”
P=Replace(X,good,nice)
输出结果为：P=”VB is very nice”
5. StrReverse函数
[格式]：
P=StrReverse(X)
[说明]：
返回X参数反转后的字符串
[范例]：
（1）X=”abc”
P=StrReverse(X)
输出结果：P=”cba”
6. Ucase，Lcase函数
[格式]：
P=Lcase(X) ‘ 将X字符串中的大写字母转换成小写
P=Ucase(X) ‘ 将X字符串中的小写字母转换成大写
[说明]：
除了英文字母外，其他字符或中文字都不会受到影响。
[范例]：
（1） 令 X=”VB and VC”
则Lcase(X)的结果为”vb and vc”，Ucase(X)的结果为”VB AND VC”
7. InStr函数
[格式]：
P=InStr(X,Y)
从X第一个字符起找出Y出现的位置
P=InStr(n,X,Y)
从X第n个字符起找出Y出现的位置
[说明]：
u 若在X中找到Y，则返回值是Y第一个字符出现在X中的位置。
u InStr(X,Y)相当于InStr(1,X,Y)。
u 若字符串长度，或X为空字符串，或在X中找不到Y，则都返回0。
u 若Y为空字符串，则返回0。
8. Mid函数
[格式]：
mid(字符串，从第几个开始，长度)
[说明]：
在[字符串]中[从第几个开始]取出[长度个字符串]
[范例]：
mid("小欣无敌",1,3) 则返回 "小欣无"
9. instr函数
[格式]：
instr(从第几个开始,字符串1,字符串2)
[说明：
从规定的位置开始查找，返回字符串2在字符串1中的位置
[范例]：
instr(1,"小欣无敌","小") 则返回 1,instr(2,"小欣无敌","小")，则返回 0 。 0 表示未找到
10. InStrRev函数
[格式]：
InStrRev(字符串1,字符串2,从第几个开始)
[说明]：
从规定的位置开始，从后住前查找，返回字符串2在字符串1中的位置，此处注意，虽是从后住前查找，但是返回的值还是从前往后算的。
[范例]：
instrRev("小欣无敌","小",2) 则返回 2 ; instrRev("小欣无敌","欣",1) 则返回 0 ,因为它从"小欣无敌"的第1个字开始往前查找，所以找不到。0 表示未找到
11. Left,Right函数
[格式]：
Right (字符串,长度) Left(字符串,长度)
[说明]：
从[字符串]的左边（右边）开始返回[长度]个字符
[范例]：
Left("小欣无敌,3) 则返回 "小欣无"
[范例]：
Right("小欣无敌",3) 则返回 "欣无敌"
12. Ucase,Lcase函数
[格式]：
Ucase(字符串) Lcase(字符串)
[说明]：
返回[字符串]的大写（小写）形式，只对英文字符有效
[范例]：
ucase("xiaoXINwuDi") 则返回 "XIAOXINWUDI"
[范例]：
lcase("xiaoXINwuDi") 则返回 "xiaoxinwudi"
13. Asc函数
[格式]：
Asc (字符)
[说明]：
返回[字符]的ascii编码，若有多个字符，则只返回首字符的ascii编码,和Chr()函数是一个可逆的过程
[范例]：
asc("小") 则返回 -12127 ; asc("小欣无敌") 也返回 -12127
14. Chr函数
[格式]：
Chr (ASCii编码)
[说明]：
[Ascii]编码所代表的字符，和Chr()函数是一个可逆的过程
[范例]：
chr(-12127) 则返回 "小" ；chr(asc("小")) 则返回"小"(这里是为了说明asc和chr的可逆性，例用此特性可以加密文本)
15. Trim、Ltrim、Rtrim (字符串)
[格式]：
Trim (字符串) Ltrim(字符串) Rtrim (字符串)
[说明]：
u Trim(字符串) Byval 返回去掉了前、后之后的[字符串]
u Ltrim(字符串) Byval 返回去掉了字符串前面的[字符串]
u Rtrim(字符串) Byval 返回去掉了字符串后面后的[字符串]
[范例]：
trim(" 小 欣 无敌 ") 则返回 "小欣 无敌" ，中间的空格不受任何影响
16. String函数
[格式]：
string(个数,字符)
[说明]：
返回[个数]个字符
[范例]：
string(3,"小") 则返回 "小小小" , 而 string(3,"小欣无敌") 也返回 "小"，只有首字符才有效
17. Space函数
[格式]：
space(个数)
[说明]：
返回[个数]个空格
[范例]：
space(5) 则返回 " "
18. Strconv函数
[格式]：
strconv(字符串,转换的类型)
[说明]：
将字符串转成指定的类型。常用的类型只有两个,vbwide 半角转成全角,vbNarrow 全角转成半角
[范例]：
strconv("xiao",vbwide) 则返回 "ＸＩＡＯ",而strconv("ＸＩＡＯ",vbnarrow) 则返回 "XIAO" ‘备注 vbwide = 4 ,vbnarrow = 8
19. len函数
[格式]：
len(字符串)
[说明]：
返回[字符串]的长度，
[范例]：
len("小欣无敌") 则返回 4
20. StrComp函数
[格式]：
StrComp(string1,string2[，compare])
[说明]：
返回string1字符串与string2字符串的比较结果，如果两个字符串相同，则返回0，如果小于则返回-1，如果大于则返回1
21. InStr函数
[格式]：
InStr(string1,string2[, compare])
[说明]：
返回string1字符串在string2字符串中第一次出现的位置
22. Split 函数
[格式]：
Split(string1,delimiter[, count[, start]])
[说明]：
将字符串根据delimiter拆分成一维数组，其中delimiter用于标识子字符串界限。如果省略，使用空格("")作为分隔符。
count 返回的子字符串数目，-1 指示返回所有子字符串。
start为 1 执行文本比较；如果为 0 或者省略执行二进制比较。
[范例]：
Dim MyString, MyArray, Msg
MyString = "VBScriptXisXfun!"
MyArray = Split(MyString, "x",-1,1)
Response.Write(MyArray(0))
23. Replace 函数
[格式]：
Replace(expression, find, replacewith[, compare[, count[, start]]])
[说明]：
返回字符串，其中指定数目的某子字符串(find)被替换为另一个子字符串(replacewith)
24. StrComp函数
[格式]：
StrComp(MyStr1, MyStr2, 1)
[说明]：
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。