Funkcija Mid

Vrne podatkovni tip Različica (niz), ki vsebuje navedeno število znakov v nizu.

Sintaksa

Mid( niz, začetek [, dolžina ] )

Sintaksa funkcije Mid ima te argumente:

Argument

Opis

niz

Obvezen. izraz niza, iz katerega se vrnejo znaki. Če je v nizu vrednost Null, je vrnjena vrednost Null.

začetek

Obvezen. Dolgo. Mesto znaka v argumentu niz, ki predstavlja začetno točko za funkcijo. Če je argument začetek večji od števila znakov v argumentu niz, funkcija Mid vrne niz z ničelno dolžino ("").

dolžina

Izbirno. Variant. (Dolgo). Število znakov, ki bodo vrnjeni. Če je izpuščen ali je v besedilu manj znakov, kot jih določa argument dolžina (vključno z znaki v argumentu začetek), se vrnejo vsi znaki od mesta začetek do konca niza.


Opombe

Če želite določiti število znakov v nizu, uporabite funkcijo Len.

Opomba : Uporabite funkcijo MidB z bajtnimi podatki v nizu, kot je v jezikih z dvobajtnim naborom znakov. Namesto da določijo število znakov, argumenti določijo število bajtov. Za vzorčno kodo, ki uporablja funkcijo MidB, glejte drugi primer v vzorčnem primeru.

Primer

Opomba : V spodnjih primerih je prikazana uporaba te funkcije v modulu Visual Basic for Applications (VBA). Če želite več informacij o delu z modulom VBA, izberite Vsebina za razvijalce na spustnem seznamu ob možnosti Iskanje in v iskalno polje vnesite enega ali več izrazov.

V prvem primeru se funkcija Mid uporablja za vrnitev določenega števila znakov 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".

V drugem primeru se funkcija MidB in uporabniško določena funkcija (MidMbcs) uporabljata prav tako za vrnitev znakov iz niza. Razlika ta, da je vhodni niz ANSI in dolžina v bajtih.

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"
Razširite svoja znanja
Oglejte si izobraževanje
Prvi dobite nove funkcije
Pridružite se programu Office Insider

Vam je bila informacija v pomoč?

Zahvaljujemo se vam za povratne informacije.

Zahvaljujemo se vam za povratne informacije. Videti je, da bi vam prišla prav pomoč enega od naših Officeovih agentov za podporo.

×