vba字符串函数汇总

   日期:2020-06-02     浏览:127    评论:0    
核心提示:本文为本人原创,转载请注明出处,若有错误欢迎指正,也请点波关注Dim i As String 对以下i值定义为字符串Dim b As Integer 对以下b值定义为整型1、Len(string)计算string长度 例 b = Len(“123321”) b返回62、Trim(string)去掉string左右两端空格 Ltrim(string)去掉string左端空格 Rtrim(string)去掉st...

本文为本人原创,转载请注明出处,若有错误欢迎指正,也请点波关注

Dim i As String  对以下i值定义为字符串

Dim b As Integer     对以下b值定义为整型

1、Len(string)计算string长度

        例 b = Len(“123321”)   

        b返回6

 

2、Trim(string)去掉string左右两端空

      Ltrim(string)去掉string左端空

      Rtrim(string)去掉string右端空

 

3、Left(string, x)取string左段x个字符组成的字符串

        例 i = Left("123456",3) 

        i返回 "123"

 

4、Right(string, x)取string右段x个字符组成的字符串

         例 i = Left("123456",3) 

         i返回 "456"

 

5、Mid(string, start,x)取string从start位开始的x个字符组成的字符串

         例 i = Left("123456",2,3) 

         i返回 "234"

 

6、Ucase(string)转换为大写

        例 i = Ucase ("asdf ") 

        i返回 " ASDF "   

 

7、Lcase(string)转换为小写

         例 i = Lcase ("ASDF") 

         i返回 "asdf"

 

8、Space(x)返回x个空白的字符串

 

9、String(X,Y) 返回X个Y

         例 i = String(5,”W”)  

         i返回 "WWWWW"

注:仅第一个字符将用于建立返回的字符串

例 i = string(3,"1234") 

i返回 "111"

 

10、Asc(string)返回一个代表字符串中首字母的ASCII编码

         仅第一个字符将用于建立返回的字符串

 

11、Chr(charcode)返回 ASCII编码所代表的字符

         Asc的逆运算

Null (Chr (0))

水平制表符 (Chr (9))

换行 (Chr (10))

垂直制表符 (Chr (11))

换页(Chr (12))

回车 (Chr (13))

 

12StrConv(string, conversion, LCID)

返回按指定类型转换的 Variant (String)。

       String  必要参数。要转换的字符串表达式

       Conversion  必要参数。Integer。其值的和决定转换的类型。

       LCID  可选的。如果与系统LocaleID不同,则为LocaleID(系统LocaleID为缺省值。)

conversion 参数的设置值为:

常数                 值            说明

vbUpperCase                  1              将字符串文字转成大写。

vbLowerCase                  2              将字符串文字转成小写。

vbProperCase         3              将字符串中每个字的开头字母转成大写。

vbWide*                  4*            将字符串中单字节字符转成双字节字符。

vbNarrow*              8*            将字符串中双字节字符转成单字节字符。

vbKatakana**        16**       将字符串中平假名字符转成片假名字符。

vbHiragana**         32**       将字符串中片假名字符转成平假名字符。

vbUnicode               64            根据系统的缺省码页将字符串转成 Unicode。

vbFromUnicode     128          将字符串由 Unicode 转成系统的缺省码页。

    例 i = StrConv("abc def ghi", vbProperCase)

    i返回"Abc Def Ghi"

 

13InStr([start, ]string1, string2[, compare])

返回 Variant (Long),指定一字符串在另一字符串中最先出现的位置。

Start        可选参数。为数值表达式,设置每次搜索的起点。如果省略,将从第一个字符的位置开始。如果 start 包含 Null,将发生错误。如果指定了 compare 参数,则一定要有 start 参数。

string1     必要参数。接受搜索的字符串表达式。

string2     必要参数。被搜索的字符串表达式。

Compare 可选参数。指定字符串比较。如果 compare 是 Null,将发生错误。如果省略 compare,Option Compare 的设置将决定比较的类型。指定一个有效的LCID (LocaleID) 以在比较中使用与区域有关的规则。

例:b = InStr(”qwerty” , “r”) 

b返回整形4,代表的是字节位数

 

14、InstrRev(stringcheck, stringmatch[, start[, compare]])

返回一个字符串在另一个字符串中出现的位置,从字符串的末尾算起。

         与InStr([start, ]string1, string2[, compare])类似,

         InStr()是从首部开始算起

         InstrRev()是从尾部开始算起

 

15、Replace(expression, find, replace[, start[, count[, compare]]])

         返回一个字符串,该字符串中指定的子字符串已被替换成另一子字符串,并且替换发生的次数也是指定的。

         Expression      必需的。字符串表达式,包含要替换的子字符串。

         Find                  必需的。要搜索到的子字符串。

         Replace            必需的。用来替换的子字符串。

         Start                 可选的。在表达式中子字符串搜索的开始位置。如果忽略,则从1开始。

         Count                        可选的。子字符串进行替换的次数。如果忽略,缺省值是 –1,它表明进行所有可能的替换。

         Compare         可选的。数字值,表示判别子字符串时所用的比较方式。关于其值,请参阅“设置值”部分。

Replace函数的返回值是一个字符串,但是,其中从start所指定的位置开始,到expression字符串的结尾处的一段子字符串已经发生过替换动作。并不是原字符串从头到尾的一个复制。

例 i = Replace("123456", "3", "0")  

i返回 "120456"

 

16、将两个字符串合并

         直接使用&将两个字符串连起来

         例 i = “abc” & “123”

i返回 " abc123 "

 
打赏
 本文转载自:网络 
所有权利归属于原作者,如文章来源标示错误或侵犯了您的权利请联系微信13520258486
更多>最近资讯中心
更多>最新资讯中心
0相关评论

推荐图文
推荐资讯中心
点击排行
最新信息
新手指南
采购商服务
供应商服务
交易安全
关注我们
手机网站:
新浪微博:
微信关注:

13520258486

周一至周五 9:00-18:00
(其他时间联系在线客服)

24小时在线客服