Ukaz Mid, funkcija Mid

Vrne zahtevani del izraza vrste niza-String (funkcija Mid), ali pa zamenja del niza z drugim nizom (ukaz Mid).

Skladnja:


Mid (Besedilo As String, Začetek As Long [, Dolžina As Long]) or Mid (Besedilo As String, Začetek As Long , Dolžina As Long, Besedilo2 As String)
Mid([ByRef] string As String, Start As Long, [Length As Long], Text As String)

Vrnjena vrednost:

String (samo za funkcijo)

Parametri:

Besedilo: poljuben niz, ki ga želite spremeniti.

Začetek: numeričen izraz, pri katerem znaku se začenja niz, katerega želite vrniti ali zamenjati. Najmanjša dovoljena vrednost je 1. Največja dovoljena vrednost je 2.147.483.648.

Dolžina: numeričen izraz, ki pove, koliko znakov želite zamenjati ali vrniti. Največja dovoljena vrednost je 2.147.483.648.

Če parameter Dolzina v funkciji Mid izpustite, bo funkcija vrnila vse znake od točke Zacetek do konca niza.

Če je parameter Dolzina v ukazu Mid krajši od dolžine besedila, ki ga želite zamenjati, se besedilo skrajša na navedeno dolžino.

Besedilo: Niz, ki naj zamenja vsebino (ukaz Mid).

Kode napak:

5 Neveljaven klic procedure

Primer:


Sub ExampleMid_Function_and_Statement
  text = "This is the original Text"
func1:
  MsgBox Mid(text, 13, 8)   ' returns the word "original"
  MsgBox text               ' text is not modified
stmt1:
  Mid(text, 13, 8, "new")
  MsgBox text               ' returns "This is the new Text"
func2:
  MsgBox Mid(start:=10, string:="The quick brown fox ..") ' shows " brown fox .."
stmt2:
  Mid text, 9, 12, "a new Phrase"
  MsgBox text               ' returns "This is a new Phrase"
End Sub