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 tegn, der returneres fra. Hvis strengen indeholder Null, returneres null.

start

Obligatorisk. Lang. Tegnposition i strengen, hvor den del, der skal tages, begynder. Hvis start er større end antallet af tegn i strengen,returnerer Midt en streng af længden nul ("").

længde

Valgfri. Variant (Lang). Antal tegn, der skal returneres. Hvis det udelades, eller der er færre end længdetegn i teksten (inklusive tegnet i starten),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 for 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 eksemplets emne.

Eksempler på forespørgsler

Udtryk

Resultater

SELECT ProductID, Mid(ProductID,5) AS Expr1 FROM ProductSales;

Returnerer "Produkt-id" og den del af ProductID, der starter fra tegnposition 5, og viser resultaterne i kolonnen Udtryk1.

SELECT ProductID, Mid(ProductID,5,4) AS testMid FROM ProductSales;

Returnerer "ProductID" og den del af ProductID, der starter fra tegnposition 5, der indeholder 4 tegn og viser resultaterne i kolonnen testMid.

VBA-eksempler

Bemærk!: Følgende eksempler demonstrerer brugen af denne funktion i et VBA-modul (Visual Basic for Applications). 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 Midt 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 MidtB og en brugerdefineret funktion (MidMbcs) til også at returnere tegn fra strengen. 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"

Strengfunktioner, og hvordan de skal bruges

Har du brug for mere hjælp?

Udvid dine færdigheder
Gå på opdagelse i kurser
Få nye funktioner først
Deltag i Microsoft Office Insiders

Var disse oplysninger nyttige?

Hvor tilfreds er du med kvaliteten af sproget?
Hvad påvirkede din oplevelse?

Tak for din feedback!

×