Funkcija Mid

Pateikia variantą (eilutę), kuriame yra nurodytas simbolių skaičius iš eilutės.

Sintaksė

MID ( eilutė, Pradžia [, ilgis ] )

Funkcijos Mid sintaksė turi tokius argumentus:

Argumentas

Aprašas

eilutė

Būtina. eilutės išraiška, iš kurių yra pateikti simboliai. Jei eilutėje yra NULL, grąžinama neapibrėžta reikšmė NULL .

pradžia

Būtinas. Ilgai. Simbolio padėtis eilutėje , kurioje pradedama imtis. Jei Pradžia yra didesnė nei eilutėssimbolių skaičius, funkcija Mid pateikia nulinio ilgio eilutę ("").

ilgis

Pasirinktinai. Variant (ilgas). Pateiktinų simbolių skaičius. Jei nenurodyta, ar tekste yra mažiau nei ilgio simbolių (įskaitant simbolį pradžios pradžioje), visi simboliai iš pradžios pozicijos į eilutės pabaigą grąžinami.


Pastabos

Norėdami nustatyti simbolių skaičių eilutėje, naudokite funkciją Len.

Pastaba: Naudokite funkciją MIDB kartu su baitų duomenimis, esančiais eilutėje, kaip dvibaičių simbolių rinkinio kalbas. Užuot nurodę simbolių skaičių, argumentai nurodo baitų skaičių. Pavyzdžio kodą, kuris naudoja MIDB, žiūrėkite antrąjį pavyzdį pavyzdyje tema.

Užklausos pavyzdžiai

Reiškinys

Rezultatai

Pasirinkite ProductID, MID (ProductID, 5) kaip Reiškinys1 iš ProductSales;

Pateikia "ProductID" ir ProductID dalį nuo simbolio vietos 5 ir rodo rezultatus stulpelyje Reiškinys1.

Pasirinkite ProductID, MID (ProductID, 5, 4) kaip testMid iš ProductSales;

Pateikia "ProductID" ir ProductID dalį, pradedant nuo simbolio padėties 5, kuriame yra 4 simboliai ir rodomi rezultatai stulpelyje testMid.

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 funkcija Mid , kad būtų grąžintas nurodytas simbolių skaičius iš eilutės.

Dim MyString, FirstWord, LastWord, MidWords
MyString = "Mid Function Demo" ' Create text string.
FirstWord = Mid(MyString, 1, 3) ' Returns "Mid".
LastWord = Mid(MyString, 14, 4) ' Returns "Demo".
MidWords = Mid(MyString, 5) ' Returns "Function Demo".

Antrasis pavyzdys naudoja MIDB ir vartotojo apibrėžiamą funkciją (midmbcs), kad taip pat grąžintų simbolius iš eilutės. Skirtumas čia yra tas, kad įvesties eilutė yra ANSI, o ilgis yra baitais.

Function MidMbcs(ByVal str as String, start, length)
MidMbcs = StrConv(MidB(StrConv(str, vbFromUnicode), _
start, length), vbUnicode)
End Function
Dim MyString
MyString = "AbCdEfG"
' Where "A", "C", "E", and "G" are DBCS and "b", "d",
' and "f" are SBCS.
MyNewString = Mid(MyString, 3, 4)
' Returns ""CdEf"
MyNewString = MidB(MyString, 3, 4)
' Returns ""bC"
MyNewString = MidMbcs(MyString, 3, 4)
' Returns "bCd"

Pastaba:  Šis puslapis išverstas automatiškai, todėl gali būti gramatikos klaidų ar netikslumų. Mūsų tikslas – padaryti, kad šis turinys būtų jums naudingas. Prašome mus informuoti, ar radote reikiamos informacijos. Čia yra straipsnis anglų kalba, kuriuo galite pasinaudoti kaip nuoroda.

Taip pat žr.

Eilučių funkcijos ir jų naudojimas

Tobulinkite savo „Office“ į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ų.

×