LibreOffice 25.2 Hjelp
Returnerer den gjevne delen av eit strenguttrykk (Mid-funksjonen) eller erstattar delen av eit strenguttrykk med ein annan streng (Mid-subrutine).
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)
Streng (berre med funksjon)
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).
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