Functie Len
Van toepassing op
Geeft een waarde van het gegevenstype Lang als resultaat die het aantal tekens in een tekenreeks bevat of het aantal bytes dat nodig is om een variabele op te slaan.
Syntaxis
Len(string* | *varname)
De syntaxis van de functie Len bevat de volgende argumenten:
| Argument | Beschrijving |
|---|---|
| tekenreeks | Elke geldige tekenreeksexpressie. Als tekenreeks Null bevat, wordt Null geretourneerd. |
| varnaam | Elke geldige naam van een variabele. Als varname Null bevat, wordt Null geretourneerd. Als varname een variant is, behandelt Len deze hetzelfde als een tekenreeks en retourneert het altijd het aantal tekens dat het bevat. |
Opmerkingen
Eén (en maximaal één) van de twee mogelijke argumenten moet worden opgegeven. In het geval van door de gebruiker gedefinieerde typen retourneert Len de grootte zoals deze wordt weggeschreven naar het bestand.
Opmerking
Gebruik de functie LenB met bytegegevens in een tekenreeks, zoals in talen met een double-byte tekenset (DBCS). In plaats van het aantal tekens in een tekenreeks te retourneren, bestaat het resultaat van LenB uit het aantal bytes dat wordt gebruikt om de tekenreeks te vertegenwoordigen. In het geval van door de gebruiker gedefinieerde typen retourneert LenB de grootte in het geheugen, inclusief eventuele opvulling tussen elementen. Zie het tweede voorbeeld in het onderwerp Voorbeeld voor een voorbeeld van code waarin LenB wordt gebruikt.
Opmerking
U kunt Len mogelijk niet gebruiken om het werkelijke aantal opslagbytes te bepalen dat nodig is wanneer de functie wordt gebruikt met tekenreeksen met een variabele lengte in gegevenstypen die door de gebruiker zijn gedefinieerd.
Queryvoorbeeld
| Expressie | Resultaten |
|---|---|
| SELECT ProductID, Len(ProductID) AS ProductLen FROM ProductSales; | Retourneert de waarden uit het veld 'ProductID' en de lengte van deze waarden in de kolommen ProductLen. |
VBA-voorbeelden
Opmerking
In de volgende voorbeelden wordt het gebruik van deze functie in een VBA-module (Visual Basic for Applications) toegelicht. Meer informatie over het werken met VBA vindt u door in de vervolgkeuzelijst naast Zoeken de optie Referentie voor ontwikkelaars te selecteren en een of meer termen in het zoekvenster te typen.
In het eerste voorbeeld wordt Len gebruikt om het aantal tekens in een tekenreeks op te vragen of het aantal bytes dat nodig is om een variabele op te slaan. Het type... Het definiëren van CustomerRecord het eindtypeblok moet worden voorafgegaan door het trefwoord Privé als dit wordt weergegeven in een klassemodule. In een standaardmodule kan een Type-instructie Public zijn.
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.
In het tweede voorbeeld worden LenB en een door de gebruiker gedefinieerde functie (LenMbcs) gebruikt om het aantal byte-tekens in een tekenreeks op te vragen als ANSI wordt gebruikt voor de weergave van de tekenreeks.
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.