Pateikia ilgą skaičių su eilutėje esančių simbolių skaičiumi arba baitų, reikalingų saugoti kintamasis, skaičiumi.
Sintaksė
Len( eilutė | kintamojo pavadinimas)
Funkcijos Len sintaksė turi tokius argumentus:
|
Argumentas |
Aprašas |
|
eilutė |
Bet kuris galiojantis eilutės išraiška. Jei eilutėje yra Null, grąžinamas Null. |
|
kintamojo pavadinimas |
Bet kuris galiojantis kintamasis pavadinimas. Jei kintamojo pavadinime yra Null, pateikiama Null. Jei kintamojo pavadinimas yra Variantas, Len traktuoja jį taip pat kaip eilutę ir visada pateikia jame esančių simbolių skaičių. |
Pastabos
Reikia nurodyti vieną (ir tik vieną) iš dviejų galimų argumentų. Kai vartotojo nustatyti tipai, "Len" grąžina dydį, koks bus įrašytas į failą.
Pastaba: Naudokite funkciją LenB su baitų duomenimis, esančiais eilutėje, kaip dvibaičių simbolių rinkinio (DBCS) kalbomis. Užuot grąžinęs simbolių skaičių eilutėje, LenB grąžins baitų skaičių, naudojamą tai eilutei pateikti. Su vartotojo apibrėžtais tipais LenB grąžina atminties dydį, įskaitant užpildymą tarp elementų. Pavyzdžio kodo, kuris naudoja LenB, ieškokite antrame pavyzdyje temoje.
Pastaba: "Len " gali nepavykti nustatyti faktinio saugyklos baitų skaičiaus, kai naudojama su kintamo ilgio eilutėmis vartotojo apibrėžtuose duomenų tipuose.
Užklausos pavyzdys
|
Reiškinys |
Rezultatai |
|
SELECT ProductID, Len(ProductID) AS ProductLen FROM ProductSales; |
Grąžina reikšmes iš lauko "ProductID" ir tų reikšmių ilgį stulpeliuose ProductLen. |
VBA pavyzdžiai
Pastaba: Pateiktuose pavyzdžiuose parodyta, kaip naudoti šią funkciją „Visual Basic for Applications“ (VBA) modulyje. Daugiau informacijos apie darbą su VBA rasite išplečiamajame sąraše pasirinkę Kūrėjų nuoroda (šalia Ieškos) ir ieškos lauke įvedę vieną ar daugiau sąlygų.
Pirmajame pavyzdyje naudojama Len , kad būtų pateiktas eilutės simbolių skaičius arba baitų, reikalingų kintamajam saugoti, skaičius. Tipas... Prieš pabaigos tipo bloką, apibrėžiantį CustomerRecord , turi būti raktažodis Privatus, jei jis rodomas klasės modulyje. Standartiniame modulyje sakinys Tipas gali būti Viešas.
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.
Antrame pavyzdyje naudojama LenB ir vartotojo apibrėžta funkcija (LenMbcs), kad būtų pateiktas baitų simbolių skaičius eilutėje, jei ANSI naudojama eilutei pateikti.
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.
