Funkcija Mid

Vraća vrijednost Variant (Niz) koja sadrži određeni broj znakova iz niza.

Sintaksa

Mid ( niz, Start [, dužina ] )

Sintaksa funkcije Mid sadrži sljedeće argumente:

Argument

Opis

niz

Obavezno. nizovni izraz iz kojih su vraćeni znakovi. Ako string sadrži null, vraća se Null .

pocetak

Obavezno. Dugo. Položaj znaka u nizu na kojem se pokreće dio koji se uzima. Ako je početak veći od broja znakova u nizu, Mid vraća niz nulte duljine ("").

duljina

Dodatno. Variant (dugo). Broj znakova koji će biti vraćen. Ako se izostavi ili ako u tekstu postoji manje od duljine znakova (uključujući znak na početnompopisu), vraćaju se svi znakovi iz položaja Start do kraja niza.


Napomene

Da biste odredili broj znakova u nizu, koristite funkciju Len.

Napomena: Koristite funkciju MIDB s bajtnim podacima sadržanim u nizu, kao u jezicima dvobajtnih znakovnih skupa. Umjesto navođenja broja znakova, argumenti određuju brojeve bajtova. Ogledni kod koji koristi MIDBpotražite u drugom primjeru u temi primjera.

Primjeri upita

Izraz

Rezultati

Odaberite ProductID, Mid (IDProizvoda, 5) kao

Vraća "ProductID" i dio proizvoda počevši od položaja znaka 5 i prikazuje rezultate u stupcu.

Odaberite ProductID, Mid (IDProizvoda, 5, 4) kao testMid iz programa ProductSales;

Vraća "ProductID" i dio proizvoda počevši od položaja znaka 5, koji sadrži 4 znaka i prikazuje rezultate u stupcu testMid.

Primjeri VBA

Napomena: Primjeri koji slijede prikazuju korištenje te funkcije u modulu jezika Visual Basic for Applications (VBA). Da biste pronašli dodatne informacije o radu s VBA-om, na padajućem popisu uz stavku Traži odaberite stavku Referenca za razvojne inženjere pa unesite jedan ili više izraza u okvir pretraživanja.

U prvom primjeru funkcija Mid koristi se za vraćanje određenog broja znakova iz niza.

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 primjer koristi MIDB i korisnički definirane funkcije (midmbcs) da bi se vratili i likovi iz niza. Razlika je u tome što je ulazni niz ANSI, a duljina 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 je stranica strojno prevedena te može sadržavati gramatičke pogreške ili netočnosti. Naša je namjera da vam ovaj sadržaj bude koristan. Jesu li vam te informacije bile korisne? Kao referencu možete pogledati i članak na engleskom jeziku.​

Dodatni sadržaji

Funkcije niza i njihovo korištenje

Proširite svoje vještine korištenja sustava Office
Istražite osposobljavanje

Jesu li vam ove informacije bile korisne?

Hvala vam na povratnim informacijama!

Hvala vam na povratnim informacijama! Čini se da bi vam pomoglo kad bismo vas povezali s nekim od naših agenata podrške za Office.

×