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 jih želite vrniti. Če ga izpustite ali če je v besedilu manj znakov kot dolžina (vključno z znakom na začetku), so vrnjeni vsi znaki od začetnega mesta 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.
Primeri poizvedb
Izraz |
Rezultati |
SELECT ProductID, Mid(ProductID,5) AS Expr1 FROM ProductSales; |
Vrne »IDizdelka« in del argumenta »IDizdelka« z začetkom na mestu znaka 5 in prikaže rezultate v stolpcu Expr1. |
SELECT ProductID, Mid(PRODUCTID,5,4) AS testMid FROMSales izdelkov; |
Vrne »IDizdelka« in del argumenta »IDIzdelka« z začetkom pri položaju znakov 5, ki vsebuje 4 znake in prikaže rezultate v preskusu stolpcaMid. |
Primeri VBA
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"