Funkcija Mid

Daje tip podataka Varijanta (Niska) koji sadrži navedeni broj znakova iz niske.

Sintaksa

Mid ( niska, početak [, dužina ] )

Sintaksa funkcije Mid ima sledeće argumente:

Argument

Opis

niska

Obavezno. izraz niske iz kojih se znakova vraćaju. Ako Niska sadrži vrednost NULL, vraća se Null .

početak

Obavezno. Dugaиko. Pozicija znakova u okviru Niska na kojoj je deo koji treba da se uzme počinje. Ako je početni ekran veći od broja znakova u niski, Mid daje nisku nulte dužine ("").

length

Opcionalno. Varijanta (Long). Broj znakova za povraćaj. Ako je izostavljen ili ako ima manje od dužine znakova u tekstu (uključujući znak na početnomsajtu), vraćaju se svi znakovi iz pozicije početka na kraj niske.


Primedbe

Da biste utvrdili broj znakova u argumentu niska, upotrebite funkciju Len.

Napomena: Koristite funkciju MIDB sa podacima o bajtovima koji se nalaze u niskom, kao što su jezici za podešavanje dvobajtnih znakova. Umesto da precizira broj znakova, argumenti navode brojeve bajtova. Za probni kôd koji koristi MIDB, pogledajte drugi primer u temi primera.

Primeri upita

Izraz

Rezultati

Izaberite stavku ID-ovi, Mid (ID proizvoda, 5) kao Izraz1 iz proizvoda proizvodi.

Daje "ID proizvoda" i deo ProductID počevši od pozicije znaka 5 i prikazuje rezultate u koloni Izraz1.

Izaberite stavke ID-ovi, Mid (ID-ova, 5, 4) kao testMid iz prodaje proizvode;

Daje "ID proizvoda" i deo ProductID počevši od pozicije znaka 5, koji sadrži 4 znaka i prikazuje rezultate u testMid koloni.

VBA primeri

Napomena: Primeri koji slede pokazuju upotrebu ove funkcije u Visual Basic for Applications (VBA) modulu. Za više informacija o radu sa VBA modulom izaberite stavku Referenca razvojnog programera sa padajuće liste pored stavke Pretraga i unesite termine u polje za pretragu.

Prvi primer koristi funkciju Mid da bi se dao navedeni broj znakova iz niske.

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

Drugi primer koristite stavke MIDB i korisnički definisana funkcija (midmb) da biste takođe vratili znakove iz niske. Razlika ovde je da je ulazna niska ANSI i da je dužina u bajtovima.

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"

Napomena:  Ova stranica je prevedena automatski i može da sadrži gramatičke greške ili netačnosti. Naš cilj je da ovaj sadržaj bude koristan. Možete li da nam javite da li su informacije bile korisne? Ovo je članak na engleskom jeziku za referencu.​

Takođe pogledajte

Funkcije za rad sa niskama i kako ih koristiti

Razvijte Office veštine
Istražite obuku
Prvi nabavite nove funkcije
Pridružite se Office Insider korisnicima

Da li su vam ove informacije koristile?

Hvala vam na povratnim informacijama!

Hvala za povratne informacije! Izgleda da će biti od pomoći ako vas povežemo sa našim agentima Office podrške.

×