Mid, functie
Van toepassing op
Geeft een variant (tekenreeks) als resultaat die een opgegeven aantal tekens van een tekenreeks bevat.
Syntaxis
Mid(tekenreeks, begin [, lengte ] )
De syntaxis van de functie Mid heeft deze argumenten:
| Argument | Beschrijving |
|---|---|
| tekenreeks | Vereist. tekenreeksexpressie waaruit tekens worden geretourneerd. Als tekenreeks Null bevat, wordt Null geretourneerd. |
| begin | Vereist. Long. Tekenpositie in tekenreeks waarop het te nemen deel begint. Als het begin groter is dan het aantal tekens in de tekenreeks, geeft Midden een tekenreeks met de lengte nul ('' ) als resultaat. |
| lengte | Optioneel. Variant (Lang). Het aantal tekens dat als resultaat moet worden gegeven. Als de tekst wordt weggelaten of als de tekst minder dan lengte bevat (inclusief het teken bij het begin), worden alle tekens vanaf de beginpositie tot het einde van de tekenreeks geretourneerd. |
Opmerkingen
Gebruik de functie Lengte om het aantal tekens in de tekenreeks te bepalen.
Opmerking
Gebruik de functie DEELB met bytegegevens in een tekenreeks, zoals in talen met een double-byte tekenset. In plaats van het aantal tekens op te geven, geven de argumenten het aantal bytes op. Zie het tweede voorbeeld in het onderwerp Voorbeeld voor een voorbeeld van code waarin DEELB wordt gebruikt.
Queryvoorbeelden
| Expression | Resultaten |
|---|---|
| SELECT ProductID, DEEL(ProductID,5) AS Expr1 FROM ProductSales; | Retourneert de 'ProductID' en het deel van ProductID vanaf tekenpositie 5 en geeft de resultaten weer in de kolom Expr1. |
| SELECT ProductID, DEEL(ProductID,5,4) AS testDEEL FROM ProductSales; | Retourneert de 'ProductID' en het deel van ProductID vanaf tekenpositie 5, met 4 tekens en geeft de resultaten weer in de kolom testDEEL. |
VBA-voorbeelden
Opmerking
De volgende VBA-voorbeelden laten zien hoe deze functie wordt gebruikt in een VBA-module (Visual Basic for Applications). Meer informatie over het werken met VBA vindt u door in de vervolgkeuzelijst naast Zoeken de optie Referentie voor ontwikkelaars te selecteren en een of meer termen in het zoekvenster te typen.
In het eerste voorbeeld wordt de functie DEEL gebruikt om een opgegeven aantal tekens op te halen uit een tekenreeks.
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".
In het tweede voorbeeld worden DEELB en een door de gebruiker gedefinieerde functie (DEELMbcs) gebruikt om ook tekens op te halen uit een tekenreeks. Het verschil hier is dat de ingevoerde tekenreeks bestaat uit ANSI-tekens en dat de lengte wordt uitgedrukt in bytes.
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"