Funkcija LEN

Svarbu :  Šis straipsnis išverstas naudojant mašininį vertimą, žr. atsakomybės atsisakymą. Su šio straipsnio versija anglų kalba galite susipažinti čia .

Pateikia ilgą eilutėje esančių simbolių skaičių arba reikia laikyti kintamasisbaitų.

Sintaksė

Len ( eilutės | kintamojo pavadinimas)

Funkcija Len sintaksės argumentai:

Argumentas

Aprašas

eilutė

Bet kurį galioja eilutės išraiška. Jei eilutėje yra neapibrėžta reikšmė, grąžinama neapibrėžta reikšmė.

kintamojo pavadinimas

Bet kurios neleistina kintamasis pavadinimą. Jei kintamojo pavadinimas yra neapibrėžta reikšmė, grąžinama neapibrėžta reikšmė. Jei kintamojo pavadinimas yra variantą, traktuoja taip pat, kaip eilutės ir visuomet pateikia joje simbolių skaičių.


Pastabos

Vienas (ir tik vienas) du galimi argumentai turi būti nurodyta. Vartotojo apibrėžtos tipai, Len pateikia dydį, jis bus įrašyti į failą.

Pastaba : Naudokite funkciją LenB baito duomenims eilutėje, kaip dvibaičių simbolių rinkinių (DBCS) kalbų. Užuot grįžus simbolių skaičių eilutėje, funkcija LenB grąžina baitų naudojamas atvaizduoti ši eilutė. Naudojant vartotojo nustatytus tipus, LenB grąžina atminties dydis, įskaitant visus padidinimo tarp elementų. Pavyzdžio kodas, naudojamas LenB, ieškokite antras pavyzdys pavyzdys temoje.

Pastaba : LEN gali nepavykti nustatyti faktinį baitų skaičių, saugyklos reikalingi, kai naudojama su vartotojo apibrėžiamų duomenų tipų kintamojo ilgio eilutes.

Pavyzdys

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ų.

Pirmoji pavyzdyje Len grąžina simbolių skaičių eilutė arba baitų reikia laikyti kintamasis. Tipo... Baigti tipo bloko apibrėžimas CustomerRecord pirmiausia privatus raktažodžių pasirodžius klasės modulis. Standartinis modulis, gali būti viešosiostipo patvirtinimas.

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.

Antras pavyzdys naudoja LenB ir vartotojo apibrėžtos funkcijos (LenMbcs) pateikiama dvibaičių simbolių skaičių eilutėje, jei ANSI naudojama eilutė.

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.

Pastaba : Mašininio vertimo atsakomybės atsisakymas: Šis straipsnis išverstas naudojant kompiuterinę sistemą be žmogaus įsikišimo. „Microsoft“ pateikia šiuos mašininius vertimus norėdama padėti anglų kalbos nesuprantantiems vartotojams perskaityti turinį apie „Microsoft“ produktus, paslaugas ir technologijas. Šis straipsnis išverstas mašininio vertimo būdu, todėl jame gali būti žodyno, sintaksės ar gramatikos klaidų.

Tobulinkite savo įgūdžius
Ieškoti mokymo
Pirmiausia gaukite naujų funkcijų
Prisijunkite prie „Office Insider“ dalyvių

Ar ši informacija buvo naudinga?

Dėkojame už jūsų atsiliepimus!

Dėkojame už jūsų atsiliepimą! Panašu, kad gali būti naudinga jus sujungti su vienu iš mūsų „Office“ palaikymo agentų.

×