VB 字符串處理函數

前端之家收集整理的这篇文章主要介绍了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是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)则返回"XIAO",而strconv("XIAO",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


http://blog.tianya.cn/blogger/post_show.asp?BlogID=41763&PostID=14798768

猜你在找的VB相关文章