Middelfunksjon

Returnerer den angitte delen av et strenguttrykk (Mellomfunksjon), eller erstatter delen av et strenguttrykk med en annen streng (Mellom subrutine).

Syntaks:


Midt(streng som streng, start som Long [, lengde som Long ]) som streng
Midt([ByRef] streng som streng, start som Long, [lengde som Long], tekst som streng)

Returverdi:

Streng (bare etter funksjon)

Parametre:

streng: Ethvert strenguttrykk du vil trekke ut (Mid funksjon). Ethvert tekstvariabelnavn som du vil endre (Midt subrutine).

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 Lengde-parameteret i Midt-underrutinen er mindre enn lengden på teksten du vil erstatte, reduseres teksten til den angitte lengden.

Tekst: Strengen som skal erstatte strenguttrykket (Midt subrutine).

Feilkoder

5 Ugyldig prosedyreoppkall

Eksempel:


Sub ExampleMid_Function_and_Statement
  text = "This is the original Text"
func1:
  MsgBox Midt(tekst, 13, 8) ' returnerer ordet "original"
  MsgBox-teksten                ' er ikke endret
stmt1:
  Mid(text, 13, 8, "new")
  MsgBox text                ' returnerer "Dette er den nye teksten"
func2:
  MsgBox Midt(start:=10, streng:en="Den raske brune reven ..") ' viser "brune reven .."
stmt2:
  Mid text, 9, 12, "a new Phrase"
  MsgBox text                ' returnerer "Dette er en ny frase"
End Sub

Supporter oss!