Returnerer en variant (streng), der indeholder et angivet antal tegn fra en streng.
Syntaks
Mid( streng, start [, længde ] )
Syntaksen for funktionen Midt har disse argumenter:
|
Argument |
Beskrivelse |
|---|---|
|
streng |
Påkrævet. strengudtryk , som tegnene returneres fra. Hvis streng indeholder Null, returneres null . |
|
start |
Obligatorisk. Lang. Tegnplacering i streng , hvor den del, der skal tages, begynder. Hvis start er større end antallet af tegn i streng, returnerer Mid en streng af længden nul (""). |
|
længde |
Valgfrit. Variant (Lang). Antal tegn, der skal returneres. Hvis det udelades, eller hvis der er færre end længdetegn i teksten (herunder tegnet ved start), returneres alle tegn fra startpositionen til slutningen af strengen. |
Bemærkninger
For at fastslå antallet af tegn i streng skal du bruge funktionen LÆNGDE.
Bemærk!: Brug funktionen MidtB med bytedata, der er indeholdt i en streng, som på sprog med dobbelt-byte-tegnsæt. I stedet for at angive antallet af tegn angiver argumenterne antallet af byte. For eksempelkode, der bruger MidB, skal du se det andet eksempel i eksempelemnet.
Forespørgselseksempler
|
Udtryk |
Resultater |
|---|---|
|
SELECT ProductID, Mid(ProductID,5) AS Udtryk1 FROM ProductSales; |
Returnerer "Produkt-id" og den del af Produkt-id, der starter fra tegnposition 5, og viser resultaterne i kolonnen Udtryk1. |
|
SELECT ProductID, Mid(ProductID,5,4) AS testMid FROM ProductSales; |
Returnerer "Produkt-id" og den del af Produkt-id, der starter fra tegnposition 5, der indeholder 4 tegn og viser resultaterne i kolonnetestMid. |
VBA-eksempler
Bemærk!: Følgende VBA-eksempler demonstrerer brugen af denne funktion i et Visual Basic for Applications (VBA)-modul. Hvis du vil have mere at vide om at arbejde med VBA, skal du vælge Udviklerreference på rullelisten ud for Søg og skrive ét eller flere ord i søgefeltet.
I det første eksempel bruges funktionen Mid til at returnere et angivet antal tegn fra en streng.
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".
I det andet eksempel bruges MidB og en brugerdefineret funktion (MidMbcs) til også at returnere tegn fra streng. Forskellen her er, at inputstrengen er ANSI, og længden er i byte.
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"
