VB 字符串處理函數_语言综合

概述1、ASC（X）：转换字符字符码 [格式]： P=Asc(X)返回字符串X的第一个字符的字符码 [范例]：（1）P=Asc("A") ’P=65 （2）P=Asc("AB") ’P=65 2、Chr[$](数值)函数 [格式]： P=Chr(X)返回字符码等于X的字符 [说明]：（1）数据范围在0到255之间（2）chr()返回的是数据类型，chr$()返回的是字符类型。（3）ansi是a

1、ASC（X）：转换字符字符码

[格式]：
P=Asc(X)返回字符串X的第一个字符的字符码
[范例]：
（1）P=Asc("A") ’P=65
（2）P=Asc("AB") ’P=65
2、Chr[$](数值)函数
P=Chr(X)返回字符码等于X的字符
[说明]：
（1）数据范围在0到255之间
（2）chr()返回的是数据类型，chr$()返回的是字符类型。
（3）ansi是acsii的扩充，其前128个字符都与ASCII码相同。
（1）我们常用以下的语句加入回车换行符 chr(13)+chr(10)
（2）P=chr(65) ’P=A
3、Len（X）：计算字符串X的长度
P=Len(X)
空字符串长度为0，空格符也算一个字符，一个中文虽然占用2Bytes，但也算一个字符。
（1）令X=" "（空字符串）
Len(X)输出结果为0
（2）令X="abcd"
Len(X)输出结果为4
（3）令X="VB教程"
4、MID(X)函数：读取字符串X中间的字符
P=MID(X,n) ’由X的第n个字符读起，读取后面的所有字符。
（1）X="abcdefg"
结果为：P="efg"
（2）X="abcdefg"
结果为：P="bcde"
5、Replace：将字符串中的某些特定字符替换为其他字符串
P=Replace(X,S,R)
[说明]：将字符串X中的字符串S替换为字符串R，然后返回。
X="VB is very good"
结果为：P="VB is very nice"
6、StrReverse：反转字符串
P=StrReverse(X)
返回X参数反转后的字符串
（1）X="abc"
输出的结果：P="cba"
7、Ucase(X)，Lcase(X)：转换英文字母的大小写
P=Lcase(X) ’将X字符串中的大写字母转换成小写
P=Ucase(X) ’将X字符串中的小写字母转换成大写
[说明]：除了英文字母外，其他字符或中文字都不会受到影响。
（1）令X="VB and VC"
则Lcase(X)的结果为"vb and vc"
Ucase(X)的结果为"VB AND VC"
8、InStr函数：寻找字符串
P=InStr(从第几个开始,string1,string2)
从规定的位置开始找，返回string2在string1中的位置
（1）若在string1中找到string2，则返回值是string1第一个字符出现在string2中的位置。
（2）InStr(string1,string2)相当于InStr(1,string2)。
（3）若字符串长度，或string1为空字符串，或在string1中找不到string2，则都返回0。
（4）若string2为空字符串，则返回0。
P=instr(1,"小欣无敌","小") P=1，
P=instr(2,"小) P=0 0表示未找到
9、InStrRev函数
InStrRev(字符串1,字符串2,从第几个开始)
从规定的位置开始，从后往前查找，返回字符串2在字符串1中的位置，此处注意，虽是从后住前查找，但是返回的值还是从前往后算的。
P=InStrRev("小欣无敌","小",2) P=1

10、left、right函数
left(字符串,长度)、right(字符串,长度)
left就是从[字符串]的左边开始返回[长度]个字符
right就是从[字符串]的右边开始返回[长度]个字符
left("小欣无敌",3)则返回"小欣无"
right("小欣无敌",3)则返回"欣无敌"
11、trim、Ltrim、Rtrim函数
[格式]
trim(字符串)Byval返回去掉了前、后之后的[字符串]
例如 trim(" 小欣无敌 ")则返回"小欣无敌"，中间的空格不受任何影响
Ltrim(string)将返回去掉字符串前面的空格
Rtrim(string)将返回去掉字符串后面的空格
trim(" 小欣无敌 ")则返回"小欣无敌"，中间的空格不受任何影响
Ltrim(" 小欣无敌 ")则返回"小欣无敌 "，只清除左边的空格
Rtrim(" 小欣无敌 ")则返回" 小欣无敌"，只清除右边的空格
12、string函数
string(个数,字符)ByVal返回[个数]个[字符]
string(3,"小")则返回"小小小"，而string(3,"小欣无敌")也返回"小"，只有首字符才有效
13、space函数
space(个数)ByVal返回[个数]个空格
space(5)则返回" "
14、strconv函数
strconv(字符串,转换的类型)ByVal将字符串转成指定的类型。常用的类型只有两个，vbwIDe半角转成全角，vbNarrow全角转成半角
strconv("xiao",vbwIDe)则返回"ＸＩＡＯ"，而strconv("ＸＩＡＯ",vbnarrow)则返回"XIAO"
’备注 vbwIDe=4,vbnarrow=8
15、len函数
len(字符串)Byval返回[字符串]的长度
len("小欣无敌")则返回4
16、StrComp函数
StrComp(string1,string2[,compare])返回string1字符串与string2字符串的比较结果，
如果两个字符串相同，则返回0，如果小于则返回-1，如果大于则返回1；
如果compare参数为1执行文本比较，如果compare参数为0或者省略执行二进制比较。
Dim MyStr1,MyStr2,MyComp
MyStr1="ABCD";MyStr2="abcd" ’定义变量
MyComp=StrComp(MyStr1,1) ’返回0
MyComp=StrComp(MyStr2,MyStr1) ’返回1
17、Split函数
Split(string1,delimiter[,count[,start]])
将string根据delimiter拆分成一维数组，其中delimiter用于标识子字符串界限。如果省略，使用空格("")作为分隔符。
count返回的子字符串数目，-1指示返回所有子字符串。
start为1执行文本比较；如果为0或者省略执行二进制比较。
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))
18、
CBool(Expression) ’将一表达式转成 Boolean 值。如果表达式的结果为非零的值，CBool 返回 True；否则返回 False。
CByte(Expression) ’将一表达式转成 Byte
CCur(Expression) ’将表达式转成 Currency
cdate(Expression) ’将字符串转换成 Date。一般说来，字符串格式的日期与时间硬编码（如示例中所示）并不好。较好的做法是使用日期原义表达式和时间的原义表达式（如 #2/12/1969#，#4:45:23 PM#）
CDbl(Expression) ’将表达式转换为 Double 类型
CDec(Expression) ’将数字值转换为 Decimal
CInt(Expression) ’将一数值转换为 Integer
CLng(Expression) ’将一数值转换为 Long
CSng(Expression) ’将一数值转换为 Single
CStr(Expression) ’将数值转换成string
CVar(Expression) ’将表达式转换为 Variant