Mid, funksjon

Obs!:  Vi ønsker å gi deg det nyeste hjelpeinnholdet så raskt som mulig, på ditt eget språk. Denne siden er oversatt gjennom automatisering og kan inneholde grammatiske feil eller unøyaktigheter. Formålet vårt er at innholdet skal være nyttig for deg. Kan du fortelle oss om informasjonen var nyttig for deg nederst på denne siden? Her er den engelske artikkelen for enkel referanse.

Returnerer en variant (streng) som inneholder et angitt antall tegn fra en streng.

Syntaks

DELTEKST ( streng, start [lengde ] )

Syntaksen for Mid -funksjonen har disse argumentene:

Argument

Beskrivelse

streng

Obligatorisk. strenguttrykk, returneres. Hvis streng inneholder Null, returneres Null .

Start

Obligatorisk. Lang. Tegnplassering i strengen som skal utføres Mid. Hvis start er større enn antall tegn i streng, returnerer DELTEKST tom streng ("").

lengde

Valgfritt. Variant (Langt). Antall tegn som skal returneres. Hvis utelatt, eller hvis det er færre lengde -tegn i teksten (inkludert tegnet ved start), returneres alle tegn fra start -plasseringen til slutten av strengen.


Kommentarer

Bruk funksjonen Lengde til å bestemme antall tegn i strengen.

Obs!: Bruke funksjonen DELTEKSTB med bytedata i en streng, som vist språk med dobbeltbyte-tegnsett. I stedet for å angi antall tegn, angi argumentene antall byte. For eksempelkode som bruker DELTEKSTB, kan du se det andre eksemplet i eksempelemnet.

Eksempel

Obs!: I eksemplene nedenfor vises bruken av denne funksjonen i en VBA-modul (Visual Basic for Applications). Hvis du vil ha mer informasjon om hvordan du arbeider med VBA, velger du Utviklerreferanse fra rullegardinlisten ved siden av Søk og skriver inn ett eller flere søkeord i søkeboksen.

Det første eksemplet brukes Mid -funksjonen til å returnere et angitt antall 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".

Det andre eksemplet brukes DELTEKSTB og en brukerdefinert funksjon (MidMbcs) til å returnere også tegn fra strengen. Her forskjellen er at inndata-streng er ANSI og lengden 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"
Bli bedre på Office
Utforsk opplæring
Vær først ute med de nye funksjonene
Bli med i Office Insiders

Var denne informasjonen nyttig?

Takk for tilbakemeldingen!

Takk for tilbakemeldingen! Det høres ut som det kan være lurt å sette deg i kontakt med én av våre Office-kundestøtteagenter.

×