Len 函数

返回 Long 值,包含字符串中的字符数或存储 变量 所需的字节数。

语法

Len ( string |varname)

Len函数语法具有以下参数:

参数

说明

字符串

任何有效的 字符串表达式 。 如果字符串包含 null,则返回 null。

varname

任何有效的 变量 名称。 如果varname包含 null,则返回 null。 如果varname是 Variant,则Len会将其视为字符串,并且始终返回它所包含的字符数。

备注

必须指定两个可能参数之一(且只能指定一个)。 通过用户定义的类型, Len返回将写入文件的大小。

注意:  将LenB函数与字符串中包含的字节数据结合使用,就像在双字节字符集(DBCS)语言中一样。 LenB返回用于表示该字符串的字节数,而不是返回字符串中的字符数。 对于用户定义的类型, LenB返回内存中的大小,包括元素之间的任何空白。 有关使用LenB的示例代码,请参阅示例主题中的第二个示例。

注意: 当用于用户定义的数据类型中的变长字符串时, Len可能无法确定所需的实际存储字节数。

查询示例

表达式

结果

从 ProductSales 中选择 "ProductID"、"Len" (ProductID)作为 ProductLen。

返回字段 "ProductID" 中的值和列 ProductLen 中这些值的长度。

VBA 示例

注意: 下面的示例演示了在 Visual Basic for Applications (VBA)模块中使用此函数的示例。 有关使用 VBA 的详细信息,请在 "搜索" 旁边的下拉列表中选择 "开发人员引用",然后在搜索框中输入一个或多个字词。

第一个示例使用Len返回字符串中的字符数或存储变量所需的字节数。 类型 .。。如果在类模块中显示 "结束类型块",则定义 CustomerRecord 必须前面是关键字Private 。 在标准模块中,类型语句可以是公共的。

Type CustomerRecord    ' Define user-defined type.
ID As Integer ' Place this definition in a
Name As String * 10 ' standard module.
Address As String * 30
End Type
Dim Customer As CustomerRecord ' Declare variables.
Dim MyInt As Integer, MyCur As Currency
Dim MyString, MyLen
MyString = "Hello World" ' Initialize variable.
MyLen = Len(MyInt) ' Returns 2.
MyLen = Len(Customer) ' Returns 42.
MyLen = Len(MyString) ' Returns 11.
MyLen = Len(MyCur) ' Returns 8.

第二个示例使用LenB和用户定义函数(LenMbcs)返回字符串中的字节字符数(如果 ANSI 用于表示字符串)。

Function LenMbcs (ByVal str as String)
LenMbcs = LenB(StrConv(str, vbFromUnicode))
End Function
Dim MyString, MyLen
MyString = "ABc"
' Where "A" and "B" are DBCS and "c" is SBCS.
MyLen = Len(MyString)
' Returns 3 - 3 characters in the string.
MyLen = LenB(MyString)
' Returns 6 - 6 bytes used for Unicode.
MyLen = LenMbcs(MyString)
' Returns 5 - 5 bytes used for ANSI.

注意:  本页面是自动翻译的,可能包含语法错误或不准确之处。 我们的目的是使此内容能对你有所帮助。 能否告知我们此信息是否有所帮助? 下面是该参考内容的英文版

另请参阅

字符串函数以及如何使用它们

扩展你的 Office 技能
了解培训
抢先获得新功能
加入 Office 预览体验计划

此信息是否有帮助?

谢谢您的反馈!

谢谢你的反馈! 可能需要转接到 Office 支持专员。

×