加载中…
个人资料
  • 博客等级:
  • 博客积分:
  • 博客访问:
  • 关注人气:
  • 获赠金笔:0支
  • 赠出金笔:0支
  • 荣誉徽章:
正文 字体大小:

VBA学习笔记之Text(七)——计算字符串长度

(2012-10-22 08:00:50)
标签:

excel

len函数

数据类型

数据类型长度

分类: VBA
 
      在VBA中,我们可以使用Len函数来确定任何字符串或字符串表达式的长度,其语法为:

Len(string|varname
      其中参数:
  • string:任何有效的字符串表达式
  • varname:任何有效的变量名
      如下代码是对Null值计算长度
Sub LenDemo()

       Dim s As Variant
    s = Null
    Debug.Print Len(s)
    Debug.Print Len(Null)

End Sub
运行结果:
Null
Null
注意:
  1. 上面代码说明如果sring为Null,或者varname是Variant类型的变量,并赋值为Null,则Len函数会返回Null。
  2. 在向文件写入某种用户自定义类型数据时,Len函数会返回数据的大小(字符数)
  3. LenB函数返回用户自定义类型数据实际占用的内存大小(字节数)
  4. 在对字节数据或Unicode字符串使用LenB函数时,LenB函数返回表示数据或字符串的字节数
  5. 不能对对象变量使用Len函数
  6. 如果varname是一个数组,则必须指定一个有效的下标,即Len函数不能确定数组中元素的总数或数组占用内存的大小。
  7. Len函数对Variant类型变量的处理和字符串变量一样,Len函数返回变量所存储的实际字符数
  8. 不同类型的字符串,其Len的结果不同。相同的字符,Variant类型占内存要大于其他类型。
Sub LenVarDemo()
  
    Dim vVar As Variant
    Dim lVar As Long
    vVar = 100
    lVar = 100
    Debug.Print LenB(vVar)
    Debug.Print LenB(lVar)
 
End Sub

运行结果:6  4
   9. 数值型数据,Len结果为其占用字节数
 Sub LenDemo()
   
    Dim i As Integer
    Dim l As Long
    Dim s As Single
    Dim d As Double
    i = 1
    l = 1
    s = 1
    d = 1
   
    Debug.Print "Integer: " & LenB(i)
    Debug.Print "Long: " & LenB(l)
    Debug.Print "Single: " & LenB(s)
    Debug.Print "Double: " & LenB(d)
   
End Sub
 
    运行结果:2   8
【应用】字符查找、存储空间的计算等

0

阅读 收藏 喜欢 打印举报/Report
  

新浪BLOG意见反馈留言板 欢迎批评指正

新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 产品答疑

新浪公司 版权所有