Len 函數

重要:  本文係由機器翻譯而成,請參閱免責聲明。本文的英文版本請見這裡,以供參考。

會傳回一個 Long,其中包含在字串中的字元數或儲存變數所需的位元組數。

語法

Len ( 字串 |varname)

Len函數語法具有下列引數︰

引數

描述

string

任何有效字串運算式。如果字串包含 null 值,則傳回 Null。

varname

任何有效的變數名稱。如果varname包含 null 值,則傳回 Null。如果varname是一種變化, Len其視為相同的字串,一律會傳回包含的字元數。


註解

其中一個 (和只有一個) 必須指定的兩個可能的引數。使用者定義類型Len會傳回會寫入檔案的大小。

附註: 使用LenB函數中的字串,如雙位元組字元集 (dbcs) 語言所含的資料。傳回字串中的字元數,而不是LenB會傳回用於代表該字串的位元組數。使用者定義類型, LenB會傳回記憶體內的大小,包括任何項目之間的邊框。Lenb函數的範例程式碼,請參閱 [範例] 主題中的第二個範例。

附註: Len可能無法判斷實際的儲存使用中使用者定義的資料類型的變數長度字串時所需的位元組數。

範例

附註: 下列範例示範如何在 Visual Basic for Applications (VBA) 模組中使用此函數。 如需使用 VBA 的詳細資訊,請在 [搜尋] 旁的下拉式清單中選取 [開發人員參考],並在 [搜尋] 方塊中輸入一個或多個字詞。

第一個範例使用Len傳回字元的字串或儲存一個變數所需的位元組數。類型中...結束類型區塊定義CustomerRecord前面必須私人關鍵字如果它會出現在類別模組。在標準模組,可公用類型陳述式。

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.

附註: 機器翻譯免責聲明︰本文係以電腦系統翻譯而成,未經人為介入。Microsoft 提供此等機器翻譯旨在協助非英語系使用者輕鬆閱讀 Microsoft 產品、服務及技術相關內容。基於本文乃由機器翻譯而成,因此文中可能出現詞辭、語法、文法上之錯誤。

擴展您的技能
探索訓練
優先取得新功能
加入 Office 測試人員

這項資訊有幫助嗎?

感謝您的意見反應!

感謝您的意見反應! 我們將協助您與其中一位 Office 支援專員連絡以深入了解您的意見。

×