Indhold

# Mid-funktion

Returnerer den specificerede del af et strengudtryk (Mid-function), eller erstatter denne del af et strengudtryk med en anden streng (Mid-subrutine).

### Syntaks:

    Mid(string As String, Start As Long [, Length As Long]) As String
    Mid([ByRef] string As String, Start As Long, [Length As Long], Text As String)

### Returværdi:

String (kun ved funktion)

### Parametre:

string: Enhvert strengudtryk, som du ønsker at trække ud (Mid-funktion). Navn på enhver tekstvariabel, du ønsker at ændre (Mid-subrutine).

Start: Numerisk udtryk, der angiver den tegnposition i strengen, hvor den mængde strenge, du vil udskifte eller returnere, begynder. The minimum allowed value is 1. Den maksimalt tilladte værdi er 2.147.483.648.

Length: Numerisk udtryk, der returnerer det antal tegn, du vil erstatte eller returnere. Den maksimalt tilladte værdi er 2.147.483.648.

Hvis længdeparameteren i funktionen Mid funktion er udeladt, vil alle tegn i strengudtrykket fra begyndelsen til slutningen af strengen returneres.

Hvis parameteren Length i Mid-subrutinen er mindre end længden af den tekst, du ønsker at erstatte, bliver teksten reduceret til den angivne længde.

Text: Den streng, som skal erstatte strengudtrykket (Mid-subrutine).

### Fejlkoder:

5 Ugyldigt Procedurekald

### Eksempel:

    Sub ExampleMid_Function_and_Statement
      text = "This is the original Text"
    func1:
      MsgBox Mid(text, 13, 8)   ' returnerer ordet "original"
      MsgBox text               ' text bliver ikke ændret
    stmt1:
      Mid(text, 13, 8, "new")
      MsgBox text               ' returnerer "This is the new Text"
    func2:
      MsgBox Mid(start:=10, string:="The quick brown fox ..") ' viser " brown fox .."
    stmt2:
      Mid text, 9, 12, "a new Phrase"
      MsgBox text               ' returnerer "This is a new Phrase"
    End Sub

Relaterede emner

Streng-funktioner