Mid-funksjonen

Returnerer den gjevne delen av eit strenguttrykk (Mid-funksjonen) eller erstattar delen av eit strenguttrykk med ein annan 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)

Returverdi:

Streng (berre med funksjon)

Parametrar:

streng: Eitkvart strenguttrykk du vil trekkja ut (Mid-funksjon). Kva tekstvariabelnamn som helst som du vil endra (Midt-subrutine).

Start: Numerisk uttrykk som viser teiknplasseringa inne i strengen der strengdelen som skal bytast ut eller kopierast byrjar. Den høgaste tillatne verdien er 2.147.483.648.

Lengd: Numerisk uttrykk som returnerer talet på teikn som skal bytast ut eller returnerast. Den høgaste tillatne verdien er 2.147.483.648.

Viss Lengd-parameteren i Mid-funksjonen ikkje vert brukt, vert alle tekna i strenguttrykket frå startplasseringa til slutten av strengen returnerte.

Viss Lengd-parameteren i Midt-subrutinen er mindre enn lengda på teksten du vil byta ut, vert teksten redusert til den gjevne lengda.

Tekst: Strengen som skal erstatta strenguttrykket (Midt-subrutine).

Feilkodar

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                ' teksten er ikkje endra
stmt1:
  Mid(text, 13, 8, "new")
  MsgBox text                ' returnerer "Dette er den nye teksten"
func2:
  MsgBox Mid(start:=10, streng:="Den raske brune reven ..") ' viser "une reven .."
stmt2:
  Mid text, 9, 12, "a new Phrase"
  MsgBox text                ' returnerer "Dette er ei ny frase"
End Sub

Støtt oss!