Midtfunksjon, Midtstatning

Innhold
Innholdsliste 🔎︎

# Mid Function, Mid Statement

Returnerer den angitte delen av et strenguttrykk (Mid-funksjon), eller erstatter delen av et strenguttrykk med en annen streng (Mid-uttrykk).

### Syntaks:

    Mid (tekst som Streng, start som Long [, lengde som Long]) eller Midt (tekst som Streng, start som Long , lengde som Long, tekst som Streng)

### Returverdi:

Streng (bare etter funksjon)

### Parametre:

Tekst: Ethvert strenguttrykk du vil endre.

Start: Numerisk uttrykk som indikerer tegnposisjonen i strengen der strengdelen du vil erstatte eller returnere begynner. Minste tillatte verdi er 1. Maksimal tillatt verdi er 2 147 483 648.

Lengde: Numerisk uttrykk som returnerer antall tegn du vil erstatte eller returnere. Maksimal tillatt verdi er 2 147 483 648.

Hvis Length-parameteren i Mid-funksjonen utelates, returneres alle tegn i strenguttrykket fra startposisjonen til slutten av strengen.

Hvis Length-parameteren i Mid-setningen er mindre enn lengden på teksten du vil erstatte, reduseres teksten til den angitte lengden.

Tekst: Strengen som skal erstatte strenguttrykket (Mid-setning).

### Feilkoder

5 Ugyldig prosedyreoppkall

### Eksempel:

    Sub ExampleUSDate
    Dim sInput As String
    Dim sUS_date As String
        sInput = InputBox("Vennligst skriv inn en dato i det internasjonale formatet 'ÅÅÅÅ-MM-DD'")
        sUS_date = Mid(sInput, 6, 2)
        sUS_date = sUS_date & "/"
        sUS_date = sUS_date & Right(sInput, 2)
        sUS_date = sUS_date & "/"
        sUS_date = sUS_date & Left(sInput, 4)
        MsgBox sUS_date
    End Sub

Lignende emner

Strengfunksjoner