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

语法

Len ( 字符串| varname )

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

参数

说明

字符串

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

varname

任何有效的 变量 名称。 如果 varname 包含 Null,则返回 Null。 如果varnameVariant,Len将它视为字符串,并始终返回它包含的字符数。

备注

必须 (一个参数) 两个可能参数中的一个。 对于用户定义的类型 ,Len 返回大小,因为它将写入文件。

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

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

查询示例

表达式

结果

SELECT ProductID、Len (ProductID) AS ProductLen FROM ProductSales;

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

VBA 示例

注意: 以下示例演示了在 VBA Visual Basic for Applications (模块) 函数。 有关使用 VBA 的信息,请在"搜索"旁边的下拉列表中选择"开发人员参考",在搜索框中输入一个或多个术语。

第一个示例使用 Len 返回字符串中的字符数或存储变量所需的字节数。 类型 ...定义名称CustomerRecord 必须前面有关键字 Private( 如果它出现在类模块中)。 在标准模块中,Type语句可以是Public。

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.

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

需要更多帮助?

扩展你的技能
了解培训

此信息是否有帮助?

你对翻译质量的满意程度如何?
哪些因素影响了你的体验?

谢谢您的反馈意见!

×