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 niz vsebuje vrednost »Null«, funkcija vrne vrednost » Null «. |
| začetek | Obvezen. Dolgo. Mesto znaka v nizu , pri katerem se začne del, ki ga želite prevzeti. Če je argument »start« večji od števila znakov v nizu, vrne funkcija Mid niz ničelne dolžine (""). |
| dolžina | Izbirno. Variant (Dolgo). Število znakov, ki bodo vrnjeni. Če je argument izpuščen ali če je v besedilu manj znakov, kot jih je (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 vrednosti »IDIzdelka« s pričetkom pri 5. mestu znaka ter prikaže rezultate v stolpcu Expr1. |
| SELECT ProductID, Mid(ProductID,5,4) AS testMid FROM ProductSales; | Vrne »IDIzdelka« in del elementa »IDIzdelka«, ki se začne pri 5. položaju znaka 5, ki vsebuje 4 znake, ter prikaže rezultate v stolpcu testMid. |
Primeri VBA
Opomba
V primerih VBA, ki so prikazani v nadaljevanju, je prikazana uporaba te funkcije v modulu VBA (Visual Basic for Applications). Č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"