Trả về một giá trị kiểu Dài chứa số ký tự trong một chuỗi hoặc số byte cần thiết để lưu một biến.
Cú pháp
Len(string* | *varname)
Cú pháp hàm Len có các đối số sau:
| Đối số | Mô tả |
|---|---|
| chuỗi | Bất kỳ biểu thức chuỗi hợp lệ nào. Nếu chuỗi chứa Null, sẽ trả về Null. |
| tên_biến | Bất kỳ tên biến hợp lệ nào. Nếu tên_biến có chứa Null, thì Null được trả về. Nếu tên_biến là biến_thể, hàm Len sẽ coi nó như một Chuỗi và luôn luôn trả về số ký tự chứa trong đó. |
Chú thích
Phải xác định một (và chỉ một) trong hai đối số khả thi. Với kiểu do người dùng xác định, hàm Len trả về kích thước khi nó được ghi vào tệp.
Lưu ý
Dùng hàm LenB với dữ liệu byte được chứa trong một chuỗi, như trong các ngôn ngữ dùng bộ ký tự byte kép (DBCS). Thay vì trả về số ký tự trong một chuỗi, LenB trả về số byte được dùng để biểu thị chuỗi đó. Với các kiểu do người dùng xác định, LenB trả về kích cỡ trong bộ nhớ, bao gồm mọi phần đệm giữa các phần tử. Để biết mã mẫu sử dụng LenB, hãy xem ví dụ thứ hai trong chủ đề ví dụ.
Lưu ý
Len có thể không xác định được số byte lưu trữ thực tế cần thiết khi được sử dụng với chuỗi có độ dài biến đổi trong kiểu dữ liệu do người dùng xác định.
Ví dụ về truy vấn
| Biểu thức | Kết quả |
|---|---|
| SELECT ProductID, Len(ProductID) AS ProductLen FROM ProductSales; | Trả về các giá trị từ trường "ID_Sản_phẩm" và độ dài của các giá trị đó trong các cột ProductLen. |
Ví dụ về VBA
Lưu ý
Các ví dụ sau thể hiện cách sử dụng hàm này trong mô-đun Visual Basic for Applications (VBA). Để biết thêm thông tin về cách làm việc với VBA, chọn Tham khảo dành cho Nhà phát triển trong danh sách thả xuống cạnh Tìm kiếm, rồi nhập một hoặc nhiều từ vào hộp tìm kiếm.
Ví dụ đầu tiên sử dụng hàm Len để trả về số ký tự trong một chuỗi hoặc số byte cần thiết để lưu một biến.
Loại... Việc xác định khối CustomerRecord Kiểu Cuối phải được từ khóa Private đứng trước nếu nó xuất hiện trong một mô-đun lớp. Trong mô-đun chuẩn, câu lệnh Type có thể là 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.
Ví dụ thứ hai sử dụng LenB và một hàm do người dùng xác định (LenMbcs) để trả về số ký tự byte trong một chuỗi nếu ANSI được dùng để biểu thị chuỗi.
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.