vb常用字符串函数.docx

1、vb常用字符串函数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) 输出结果为4

2、3. Mid(X)函数：读取字符串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=”V

3、B is very 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在

5、字符串1中的位置 例如 instr(1,小欣无敌,小) 则返回 1,instr(2,小欣无敌,小)，则返回 0 。 0 表示未找到 InStrRev(字符串1,字符串2,从第几个开始) ByVal 从规定的位置开始，从后住前查找，返回字符串2在字符串1中的位置，此处注意，虽是从后住前查找，但是返回的值还是从前往后算的。 例如 instrRev(小欣无敌,小,2) 则返回 2 ; instrRev(小欣无敌,欣,1) 则返回 0 ,因为它从小欣无敌的第1个字开始往前查找，所以找不到 。0 表示未找到 left(字符串,长度) ByVal 从字符串的左边开始返回长度个字符 例如 Left(小欣无敌

6、,3) 则返回 小欣无 right(字符串,长度) ByVal 从字符串的右边开始返回长度个字符 例如 Right(小欣无敌,3) 则返回 欣无敌 ucase(字符串) ByVal 返回字符串的大写形式，只对英文字符有效 例如 ucase(xiaoXINwuDi) 则返回 XIAOXINWUDI lcase(字符串) ByVal 返回字符串的小写形式，只对英文字符有效 例如 lcase(xiaoXINwuDi) 则返回 xiaoxinwudi asc(字符) Byval返回字符的ascii编码，若有多个字符，则只返回首字符的ascii编码,和Chr()函数是一个可逆的过程 例如 asc(小)

7、则返回 -12127 ; 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字符串的右边取得len

10、gth长度的字符串 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,del

11、imiter, count, start) 将字符串根据delimiter拆分成一维数组，其中delimiter用于标识子字符串界限。如果省略，使用空格()作为分隔符。count 返回的子字符串数目，-1 指示返回所有子字符串。start为 1 执行文本比较；如果为 0 或者省略执行二进制比较。 Replace Replace(expression, find, replacewith, compare, count, start) 返回字符串，其中指定数目的某子字符串(find)被替换为另一个子字符串(replacewith) 示例：1、Len函数示例：下面的示例利用 Len 函数返回字符串

12、中的字符数目：Dim 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 定

14、义字符串。MyStr = 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 函数返回字符串的大写形式：

15、Dim MyWordMyWord = UCase(Hello World) 返回HELLO WORLD。8、StrComp函数示例：下面的示例利用 StrComp 函数返回字符串比较的结果。如果第三个参数为 1 执行文本比较；如果第三个参数为 0 或者省略执行二进制比较。Dim MyStr1, MyStr2, MyCompMyStr1 = ABCD: MyStr2 = abcd 定义变量。MyComp = StrComp(MyStr1, MyStr2, 1) 返回 0。MyComp = StrComp(MyStr1, MyStr2, 0) 返回 -1。MyComp = StrComp(MySt

16、r2, MyStr1) 返回 1。9、InStr示例：下面的示例利用 InStr 搜索字符串：Dim SearchString, SearchChar, MyPosSearchString =XXpXXpXXPXXP?SearchChar = P?MyPos = Instr(SearchString, SearchChar)?返回 9.注意：返回的不是一个字符串在另一个字符串中第一次出现的字符位置，而是字节位置。10、Split函数示例：Dim MyString, MyArray, MsgMyString = VBScriptXisXfun!MyArray = Split(MyString,

17、x,-1,1)MyArray(0) contains VBScript.MyArray(1) contains is.MyArray(2) contains fun!.Response.Write(MyArray(0)11、Replace函数示例：Replace(ABCD, BC, 12) 得到A12D -1Chr$（数值）函数返回标准扩展码的对应字符。说明：（1）数值范围在0到255之间。（2）Chr（）返回的是数值类型，而Chr$（）则返回字符类型。（3）ANSI是ASCII码的扩充，其前128个字符都与ASCII码相同。例如，我们常用以下的语句加入回车换行符。Chr（13）+Chr（10

18、）2Asc（字符）函数此函数用来返回字符的ANSI码值。说明： 若输入为一字符串，则只返回第一个字符的ASCII码值。例如，x=Asc（a），则， x=97x=Asc（ab），则，x=973String$（个数，字符）用于重复某一个字符。说明：（1）“个数”用来指定重复的次数。（2）若“字符”为一字符串，则只重复复制第一个字符。4Len（字符串） 函数用于返回字符串的长度。5Left$（字符串，字符个数）用于返回“字符串”最左边的长度为“字符个数”的字符串。例如，Dim substr As Stringsubstr=Left（Visual Basic,3）则substr=Vis6Right$（

19、字符串，字符个数）用于返回“字符串”最右边的长度为“字符个数”的字符串。例如，Dim substr As Stringsubstr=Right（Visual Basic,3）则substr=sic7Mid$（字符串，起始位置，字符个数）用于返回一个子字符串。说明：（1）子字符串从“起始位置”开始，以“字符个数”为长度。（2）若省略“字符个数”，则从起始位置到字符串的结尾。8Lcase（字符串）和Ucase（字符串）函数Lcase：不论字符串中的字符为大写还是小写，一律输出为小写。Ucase：不论字符串中的字符为大写还是小写，一律输出为小写。9Ltrim（字符串）、Rtrim（字符串）、Trim（字符串）函数Ltrim（字符串）：用于去掉字符串中左边的空格。Rtrim（字符串）：用于去掉字符串中右边的空格。Trim（字符串）：用于去掉字符串中左右两边的空格。10Str（数值）函数 和 Val（字符串） 函数Str（数值）：用于将数字转化为字符串。Val（字符串）：用于将字符串转化为数值。例如，Dim a As StringDim b As Longa=Str（345.45）b=Val（234.45）则a=345.45b=234.45