新浪博客

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

2012-10-22 08:00阅读：

http://blog.sina.cn/dpool/blog/u/2132026954

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


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

Dim s As Variant
s = Null
FONT>
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 4 4 8
【应用】字符查找、存储空间的计算等

我的更多文章

下载客户端阅读体验更佳

APP专享