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 so vrnjeni znaki. Če je v nizu vrednost Null, je vrnjena vrednost Null. |
| začetek | Obvezen. Dolgo. Mesto znaka v nizu , pri katerem se začne del, ki ga želite izvesti. Če je argument začetek večji od števila znakov v argumentu niz, funkcija Mid vrne niz ničelne dolžine (""). |
| 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
Primeri VBA, ki sledijo, prikazujejo uporabo te funkcije v modulu VBA (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"