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ų grąžinami simboliai. Jei eilutėje yra Null, pateikiama Null .

pradžia

Būtinas. Ilgas. Simbolio padėtis eilutėje , kurioje prasideda paimtinas tekstas. Jei pradžios simbolis yra didesnis už simbolių skaičių eilutėje, Mid pateikia nulinio ilgio eilutę ("").

ilgis

Pasirinktinis. Variant (ilgas). Pateiktinų simbolių skaičius. Jei nenurodyta arba jei tekste yra mažiau simbolių nei jų ilgis (įskaitant simbolį pradžioje), grąžinami visi simboliai nuo pradžios vietos iki eilutės pabaigos.

Pastabos

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

Pastaba: Funkciją MidB naudokite su baitų duomenimis, esančiais eilutėje, kaip dvibaičių simbolių rinkinio kalbomis. Užuot nurodę simbolių skaičių, argumentai nurodo baitų skaičių. Pavyzdžio kodą, kuris naudoja "MidB", žr. antrame pavyzdyje temoje.

Užklausų pavyzdžiai

Reiškinys

Rezultatai

SELECT ProductID, Mid(ProductID,5) AS Expr1 FROM ProductSales;

Grąžina "ProductID" ir dalį ProductID pradedant nuo 5 simbolio pozicijos ir pateikia rezultatus stulpelyje Reiškinys1.

SELECT ProductID, Mid(ProductID,5,4) AS testMid FROM ProductSales;

Grąžina "ProductID" ir dalį ProductID pradedant nuo 5 simbolio pozicijos, kurioje yra 4 simboliai, ir pateikia rezultatus stulpelio 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ų pateiktas nurodytas simbolių skaičius iš eilutės.

Dim MyString, FirstWord, LastWord, MidWordsMyString = "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".

Antrame pavyzdyje naudojama MidB ir vartotojo apibrėžta funkcija (MidMbcs), kad taip pat būtų pateikti simboliai iš eilutės. Skirtumas čia tas, kad įvesties eilutė yra ANSI, o ilgis baitais.

Function MidMbcs(ByVal str as String, start, length)    MidMbcs = StrConv(MidB(StrConv(str, vbFromUnicode), _              start, length), vbUnicode)End FunctionDim MyStringMyString = "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"

Eilučių funkcijos ir jų naudojimas

Reikia daugiau pagalbos?

Norite daugiau parinkčių?

Sužinokite apie prenumeratos pranašumus, peržiūrėkite mokymo kursus, sužinokite, kaip apsaugoti savo įrenginį ir kt.

Bendruomenės padeda užduoti klausimus ir į juos atsakyti, pateikti atsiliepimų ir išgirsti iš ekspertų, turinčių daug žinių.