《VB字符串函数-.pdf》由会员分享，可在线阅读，更多相关《VB字符串函数-.pdf（8页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、VB常用字符串操作函数VB常用字符串操作函数作者：虚拟小强教程来源：本站原创点击数：2330 更新时间：2009-6-25 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”)输出 65 2.Len(X)：计算字符串X的长度 格式：P=Len(X)说明：空字符串长度为0，空格符也算一个字符，一个中文字虽然占用2 Bytes，但也算一个字符。范例：(1)令 X=”(空字符串)Len(X)输出结果为0 (
2、2)令 X=”abcd”Len(X)输出结果为4 (3)令 X=”VB教程”Len(X)输出结果为4 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，然后返回
3、。范例：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(X)，Lcase(X)：转换英文字母的大小写 格式：P=Lcase(X)将 X字符串中的大写字母转换成小写P=Ucase(X)将 X字符串中的小写字母转换成大写 说明：除了英文字母外，其他字符或中文字都不会受到影响。范例：（1）令 X=”VB and VC
4、”则 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出现的位置 说明：（1）若在 X中找到 Y，则返回值是Y第一个字符出现在X中的位置。（2）InStr(X,Y)相当于 InStr(1,X,Y)。（3）若字符串长度，或X为空字符串，或在X中找不到Y，则都返回0。（4）若 Y为空字符串，则返回0。-mid(字符串，从第几个开始，长度)ByRef 在 字符串 中 从第几个开始 取出 长度个字符串 例如
5、 mid(小欣无敌,1,3)则返回 小欣无 instr(从第几个开始,字符串 1,字符串 2)ByVal 从规定的位置开始查找，返回字符串2 在字符串 1中的位置例如 instr(1,小欣无敌,小)则返回 1,instr(2,小欣无敌,小)，则返回 0。0 表示未找到InStrRev(字符串 1,字符串 2,从第几个开始)ByVal 从规定的位置开始，从后住前查找，返回字符串2 在字符串1 中的位置，此处注意，虽是从后住前查找，但是返回的值还是从前往后算的。例如 instrRev(小欣无敌,小,2)则返回 2;instrRev(小欣无敌,欣,1)则返回 0,因为它从 小欣无敌 的第 1 个字开
6、始往前查找，所以找不到。0 表示未找到中国自学编程网 left(字符串,长度)ByVal 从 字符串 的左边开始返回 长度 个字符例如 Left(小欣无敌,3)则返回 小欣无 right(字符串,长度)ByVal 从 字符串 的右边开始返回 长度 个字符例如 Right(小欣无敌,3)则返回 欣无敌 ucase(字符串)ByVal 返回 字符串 的大写形式，只对英文字符有效例如 ucase(xiaoXINwuDi)则返回 XIAOXINWUDI lcase(字符串)ByVal 返回 字符串 的小写形式，只对英文字符有效例如 lcase(xiaoXINwuDi)则返回 xiaoxinwudi a
7、sc(字符)Byval 返回 字符 的 ascii编码，若有多个字符，则只返回首字符的ascii编码,和 Chr()函数是一个可逆的过程例如 asc(小)则返回 -12127;asc(小欣无敌)也返回 -12127 chr(ASCii编码)Byval 返回 Ascii编码所代表的字符，和Chr()函数是一个可逆的过程例如 chr(-12127)则返回 小 ；chr(asc(小)则返回 小(这里是为了说明asc 和 chr的可逆性，例用此特性可以加密文本)trim(字符串)Byval 返回去掉了前、后之后的 字符串 例如 trim(小 欣 无敌 )则返回 小 欣 无敌 ，中间的空格不受任何影响s
8、tring(个数,字符)Byval 返回 个数 个字符 例如 string(3,小)则返回 小小小 ,而 string(3,小欣无敌)也返回 小，只有首字符才有效space(个数)Byval 返回 个数 个空格例如 space(5)则返回 strconv(字符串,转换的类型)Byval 将字符串转成指定的类型。常用的类型只有两个,vbwide 半角转成全角,vbNarrow 全角转成半角例如 strconv(xiao,vbwide)则返回 ,而 strconv(,vbnarrow)则返回 XIAO 备注 vbwide=4,vbnarrow=8 len(字符串)Byval 返回 字符串 的长度例
9、如 len(小欣无敌)则返回 4 -Len Len(string|varname)返回字符串内字符的数目，或是存储一变量所需的字节数 Trim Trim(string)将字符串前后的空格去掉 Ltrim Ltrim(string)将字符串前面的空格去掉Rtrim Rtrim(string)将字符串后面的空格去掉 Mid Mid(string,start,length)从 string字符串的start字符开始取得length长度的字符串，如果省略第三个参数表示从start字符开始到字符串结尾的字符串 Left Left(string,length)从string字符串的左边取得length长度
10、的字符串 Right Right(string,length)从 string字符串的右边取得length长度的字符串 LCase LCase(string)将string字符串里的所有大写字母转化为小写字母UCase UCase(string)将string字 符 串 里 的所 有 大 写 字 母 转 化 为 大写 字 母StrComp StrComp(string1,string2，compare)返回 string1字符串与string2字符串的比较结果，如果两个字符串相同，则返回0，如果小于则返回-1，如果大于则返回1 InStr InStr(string1,string2,compa
11、re)返回 string1字符串在string2字符串中第一次出现的位置Split Split(string1,delimiter,count,start)将字符串根据delimiter拆分成一维数组，其中delimiter用于标识子字符串界限。如果省略，使用空格()作为分隔符。count 返回的子字符串数目，-1 指示返回所有子字符串。start为1 执 行 文 本 比 较；如 果 为0 或 者 省 略 执 行 二 进 制 比 较。Replace Replace(expression,find,replacewith,compare,count,start)返回字符串，其中指定数目的某子字符
12、串(find)被替换为另一个子字符串(replacewith)示例：1、Len 函数示例：下面的示例利用 Len 函数返回字符串中的字符数目：Dim MyString MyString=Len(VBSCRIPT)MyString 包含 8。2、Trim、Ltrim、Rtrim 函数示例：下面的示例利用 LTrim,RTrim,和 Trim 函数分别用来除去字符串开始的空格、尾部空格、开始和尾部空格：Dim MyVar MyVar=LTrim(vbscript)MyVar 包含 vbscript。MyVar=RTrim(vbscript)MyVar 包含 vbscript。MyVar=Trim(
13、vbscript)MyVar 包含 vbscript。3、Mid 函数示例：下面的示例利用 Mid 函数返回字符串中从第四个字符开始的六个字符：Dim MyVar MyVar=Mid(VB脚本 is fun!,4,6)MyVar 包含 Script。4、Left 函数示例：下面的示例利用Left 函数返回MyString 的左边三个字母：Dim MyString,LeftString MyString=VBSCript LeftString=Left(MyString,3)LeftString 包含 VBS 5、Right 函数示例：下面的示例利用 Right 函数从字符串右边返回指定数目的字
14、符：Dim AnyString,MyStr AnyString=Hello World 定义字符串。MyStr=Right(AnyString,1)返回 d。MyStr=Right(AnyString,6)返回 World。MyStr=Right(AnyString,20)返回 Hello World。6、LCase函数示例：下面的示例利用 LCase 函数把大写字母转换为小写字母：Dim MyString Dim LCaseString MyString=VBSCript LCaseString=LCase(MyString)LCaseString 包含 vbscript。7、UCase 函
15、数示例：下面的示例利用 UCase 函数返回字符串的大写形式：Dim MyWord MyWord=UCase(Hello World)返回 HELLO WORLD。8、StrComp 函数示例：下面的示例利用 StrComp 函数返回字符串比较的结果。如果第三个参数为 1 执行文本比较；如果第三个参数为 0 或者省略执行二进制比较。Dim MyStr1,MyStr2,MyComp MyStr1=ABCD:MyStr2=abcd 定义变量。MyComp=StrComp(MyStr1,MyStr2,1)返回 0。MyComp=StrComp(MyStr1,MyStr2,0)返回 -1。MyComp
16、=StrComp(MyStr2,MyStr1)返回 1。9、InStr示例：下面的示例利用 InStr 搜索字符串：Dim SearchString,SearchChar,MyPos SearchString=XXpXXpXXPXXP?SearchChar=P?MyPos=Instr(SearchString,SearchChar)?返回 9.注意：返回的不是一个字符串在另一个字符串中第一次出现的字符位置，而是字节位置。10、Split函数示例：Dim MyString,MyArray,Msg MyString=VBScriptXisXfun!MyArray=Split(MyString,x,
17、-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=97 x=Asc（ab），则，x=97 3String$（个数，字符）用于重复某一个字符。说明：（1）“个数”用来指定重复的次数。（2）若“字符”为一字符串，则只重复复制第一个字符。4Len（字符串）函数用于返回字符串的长度。5Left$（字符串，字符个数）用于返回“字符串”最左边的长度为“字符个数”的字符串。例如，Dim substr As String substr=Left（Visual Basic,3）则substr=Vis 6Righ
19、t$（字符串，字符个数）用于返回“字符串”最右边的长度为“字符个数”的字符串。例如，Dim substr As String substr=Right（Visual Basic,3）则substr=sic 7Mid$（字符串，起始位置，字符个数 ）用于返回一个子字符串。说明：（1）子字符串从“起始位置”开始，以“字符个数”为长度。（2）若省略“字符个数”，则从起始位置到字符串的结尾。8Lcase（字符串）和Ucase（字符串）函数Lcase：不论字符串中的字符为大写还是小写，一律输出为小写。Ucase：不论字符串中的字符为大写还是小写，一律输出为小写。9Ltrim（字符串）、Rtrim（字符串）、Trim（字符串）函数Ltrim（字符串）：用于去掉字符串中左边的空格。Rtrim（字符串）：用于去掉字符串中右边的空格。Trim（字符串）：用于去掉字符串中左右两边的空格。10 Str（数值）函数和 Val（字符串）函数Str（数值）：用于将数字转化为字符串。Val（字符串）：用于将字符串转化为数值。例如，Dim a As String Dim b As Long a=Str（345.45）b=Val（234.45）则a=345.45 b=234.45