《vb常用字符串函数.doc》由会员分享，可在线阅读，更多相关《vb常用字符串函数.doc（11页珍藏版）》请在金锄头文库上搜索。
1、1. ASC(X)，Chr(X)：转换字符字符码格式：P=Asc(X) 返回字符串X的第一个字符的字符码P=Chr(X) 返回字符码等于X的字符范例： (1)P=Chr(65) 输出字符A,因为A的ASCII码等于65(2)P=Asc(“A”) 输出652. Len(X)： 计算字符串X的长度格式： P=Len(X) 说明： 空字符串长度为0，空格符也算一个字符，一个中文字虽然占用2 Bytes，但也算一个字符。范例：(1) 令X=” (空字符串)Len(X) 输出结果为0(2) 令X=”abcd”Len(X) 输出结果为4(3) 令X=”VB教程”Len(X) 输出结果为43. Mid(X)
2、函数：读取字符串X中间的字符格式：P=Mid(X,n)由X的第n个字符读起，读取后面的所有字符。P=Mid(X,n,m)由X的第n个字符读起，读取后面的m个字符。范例：(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
3、 nice”5. StrReverse：反转字符串格式：P=StrReverse(X)说明：返回X参数反转后的字符串范例：（1）X=”abc”P=StrReverse(X)输出结果：P=”cba”6. 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”7. InStr函数：寻找字符串格
4、式：P=InStr(X,Y)从X第一个字符起找出Y出现的位置P=InStr(n,X,Y)从X第n个字符起找出Y出现的位置说明：（1） 若在X中找到Y，则返回值是Y第一个字符出现在X中的位置。（2） InStr(X,Y)相当于InStr(1,X,Y)。（3） 若字符串长度，或X为空字符串，或在X中找不到Y，则都返回0。（4） 若Y为空字符串，则返回0。-mid(字符串，从第几个开始，长度)ByRef在字符串中从第几个开始取出长度个字符串 例如 mid(小欣无敌,1,3) 则返回 小欣无 instr(从第几个开始,字符串1,字符串2)ByVal从规定的位置开始查找，返回字符串2在字符串1中的位置
5、例如 instr(1,小欣无敌,小) 则返回 1,instr(2,小欣无敌,小)，则返回 0 。 0 表示未找到 InStrRev(字符串1,字符串2,从第几个开始) ByVal 从规定的位置开始，从后住前查找，返回字符串2在字符串1中的位置，此处注意，虽是从后住前查找，但是返回的值还是从前往后算的。 例如 instrRev(小欣无敌,小,2) 则返回 2 ; instrRev(小欣无敌,欣,1) 则返回 0 ,因为它从小欣无敌的第1个字开始往前查找，所以找不到 。0 表示未找到 left(字符串,长度) ByVal 从字符串的左边开始返回长度个字符 例如 Left(小欣无敌,3) 则返回 小
6、欣无 right(字符串,长度) ByVal 从字符串的右边开始返回长度个字符 例如 Right(小欣无敌,3) 则返回 欣无敌 ucase(字符串) ByVal 返回字符串的大写形式，只对英文字符有效 例如 ucase(xiaoXINwuDi) 则返回 XIAOXINWUDI lcase(字符串) ByVal 返回字符串的小写形式，只对英文字符有效 例如 lcase(xiaoXINwuDi) 则返回 xiaoxinwudi asc(字符) Byval返回字符的ascii编码，若有多个字符，则只返回首字符的ascii编码,和Chr()函数是一个可逆的过程 例如 asc(小) 则返回 -1212
7、7 ; asc(小欣无敌) 也返回 -12127 chr(ASCii编码) Byval 返回Ascii编码所代表的字符，和Chr()函数是一个可逆的过程 例如 chr(-12127) 则返回 小 ；chr(asc(小) 则返回小(这里是为了说明asc和chr的可逆性，例用此特性可以加密文本) trim(字符串) Byval 返回去掉了前、后之后的字符串 例如 trim( 小 欣 无敌 ) 则返回 小 欣 无敌 ，中间的空格不受任何影响 string(个数,字符) Byval 返回个数个字符 例如 string(3,小) 则返回 小小小 , 而 string(3,小欣无敌) 也返回 小，只有首字
8、符才有效 space(个数) Byval 返回个数个空格 例如 space(5) 则返回 strconv(字符串,转换的类型) Byval 将字符串转成指定的类型。常用的类型只有两个,vbwide 半角转成全角,vbNarrow 全角转成半角 例如 strconv(xiao,vbwide) 则返回 ,而strconv(,vbnarrow) 则返回 XIAO 备注 vbwide = 4 ,vbnarrow = 8 len(字符串) Byval 返回字符串的长度 例如 len(小欣无敌) 则返回 4 - Len Len(string|varname) 返回字符串内字符的数目，或是存储一变量所需的字
9、节数 Trim Trim(string) 将字符串前后的空格去掉 Ltrim Ltrim(string) 将字符串前面的空格去掉 Rtrim Rtrim(string) 将字符串后面的空格去掉 Mid Mid(string,start,length) 从string字符串的start字符开始取得length长度的字符串，如果省略第三个参数表示从start字符开始到字符串结尾的字符串 Left Left(string,length) 从string字符串的左边取得length长度的字符串 Right Right(string,length) 从string字符串的右边取得length长度的字符串
10、 LCase LCase(string) 将string字符串里的所有大写字母转化为小写字母 UCase UCase(string) 将string字符串里的所有大写字母转化为大写字母 StrComp StrComp(string1,string2，compare) 返回string1字符串与string2字符串的比较结果，如果两个字符串相同，则返回0，如果小于则返回-1，如果大于则返回1 InStr InStr(string1,string2, compare) 返回string1字符串在string2字符串中第一次出现的位置 Split Split(string1,delimiter, c
11、ount, start) 将字符串根据delimiter拆分成一维数组，其中delimiter用于标识子字符串界限。如果省略，使用空格()作为分隔符。count 返回的子字符串数目，-1 指示返回所有子字符串。start为 1 执行文本比较；如果为 0 或者省略执行二进制比较。 Replace Replace(expression, find, replacewith, compare, count, start) 返回字符串，其中指定数目的某子字符串(find)被替换为另一个子字符串(replacewith) 示例：1、Len函数示例：下面的示例利用 Len 函数返回字符串中的字符数目：Di
12、m 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 函数返回字符串中从第四
13、个字符开始的六个字符：Dim MyVarMyVar = Mid(VB脚本is fun!, 4, 6) MyVar 包含 Script。4、Left函数示例：下面的示例利用Left 函数返回MyString 的左边三个字母：Dim MyString, LeftStringMyString = VBSCriptLeftString = Left(MyString, 3) LeftString 包含 VBS5、Right函数示例：下面的示例利用 Right 函数从字符串右边返回指定数目的字符：Dim AnyString, MyStrAnyString = Hello World 定义字符串。MySt
14、r = Right(AnyString, 1) 返回 d。MyStr = Right(AnyString, 6) 返回 World。MyStr = Right(AnyString, 20) 返回 Hello World。6、LCase函数示例：下面的示例利用 LCase 函数把大写字母转换为小写字母：Dim MyStringDim LCaseStringMyString = VBSCriptLCaseString = LCase(MyString) LCaseString 包含 vbscript。7、 UCase函数示例：下面的示例利用 UCase 函数返回字符串的大写形式：Dim MyWordM
