文档介绍：分类: Excel VBA >> 常用函数目录 1 VBA 中的字符串 2 VBA 中处理字符串的函数 比较字符串 转换字符串 创建字符串 获取字符串的长度 格式化字符串 查找字符串 提取字符/ 字符串 删除空格 返回字符代码 返回数值代表的相应字符 使用字节的函数 返回数组的函数 连接字符串 替换字符串 反向字符串 1 VBA 中的字符串 VBA 不仅可以处理数字,也可以处理文本( 字符串)。 VBA 提供了两类字符串: 一类为固定长度的字符串,声明时包含指字的字符数。例如,下面的语句 Dim strFixedLong As String*100 声明字符串变量后, 无论赋予该变量多少个字符, 总是只包含 100 个字符, 但字符串最长不超过 65526 个字符,且需要使用 Trim 函数去掉字符串中多余的空格。定长字符串只有在必要时才使用。另一类为动态字符串。例如,声明字符串变量 Dim strDynamic As String 后,可以给该变量任意赋值,最多可包含 20 亿个字符。 2 VBA 中处理字符串的函数 比较字符串通常,在 VBA 中进行字符串比较时, 会用到比较运算符(如=、>等)、 Like 运算符和 p 函数。此外,在模块的开头用 pare 语句指定比较方式。 比较运算符可以采用简单的逻辑运算符进行两个字符串的比较,即<( 小于)、<=( 小于或等于)、>( 大于)、>=( 大于或等于)、=( 等于)、<>( 不等于) 。此外,还可以使用 Like 运算符进行比较。 p 函数 p 函数返回字符串比较的结果。其语法为: p(string1,string2[,compare]) 其中,参数 string1 和 strng2 为必需的参数,可以是任何有效的字符串表达式。 pare 为可选参数,如果该参数为 Null ,将发生错误。pare 设置为常数 pareOption 或-1 或忽略该参数,将使用 pare 语句设置进行比较; 如果忽略该参数且没有设置 pare 语句, 则按二进制进行比较; par e 设置为常数 pare 或0 ,则用二进制进行比较;pare 设置为常数 pare 或1, 则按文本进行比较; pare 设置为常数 par e 或2 ,此时仅适用于 Microsoft Access ,进行基于数据库信息的比较。 p 函数的返回值为: 如果 String1<String2 , 则返回值为-1; 如果 String1=String2 , 则返回值为 0 ;如果 String1>String2 ,则返回值为 1 ;如果 String1 或 String2 为 Null , 则返回值为 Null 。看看下面的示例: Sub pare() Dim MyStr1 As String, MyStr2 As String, p1, p2, p3, p4 MyStr1 = "ABCD" MyStr2 = "abcd" p1 = p(MyStr1, MyStr2, 1)' 返回 0 p2 = p(MyStr1, MyStr2, 0)' 返回-1 p3 = p(MyStr1, MyStr2) ' 返回-1 p4 = p(MyStr2, MyStr1) ' 返回 1 MsgBox "p(MyStr1, MyStr2, 1) 的结果为:"& p1 MsgBox "p(MyStr1, MyStr2, 0) 的结果为:"& p2 MsgBox "p(MyStr1, MyStr2) 的结果为:"& p3 MsgBox "p(MyStr2, MyStr1) 的结果为:"& p4 End Sub 示例说明:如果 p 函数的第三个参数值为 1 ,则以文本比较的方式进行字符串比较; 如果第三个参数值为 0 或忽略该参数, 则以二进制比较的方式进行字符串比较。注意, 文本比较的方式不区分字母大小写,而二进制比较方式则区分大小写。[ 编程方法和技巧] 完成一次简单的单一比较,如 If UCase(sString1)<UCase(sString2) Then 比使用 p 函数: If p(sString1,sString2,pare)=-1 Then 在性能上要提高 30% ,且更容易阅读和理解。 转换字符串 StrConv 函数使用 StrConv 函数来按指定类型转换字符串。其语法为: StrConv(string,conversion,LCID) 其中,参数 string 为要转换的字符串,参数 conversion 为指定转换的类型,参数 LCI