VB字符串函数集

2019独角兽企业重金招聘Python工程师标准>>>

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。

转载于:https://my.oschina.net/dapeng2010/blog/295066