Funkcija Mid

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

Skladnja:


Mid(besedilo As String, Začetek As Long [, Dolžina As Long]) As String
Mid([ByRef] besedilo As String, Začetek As Long , [Dolžina As Long], Besedilo2 As String)

Vrnjena vrednost:

String (samo za funkcijo)

Parametri:

besedilo: poljuben niz, ki ga želite izluščiti (funkcija Mid). Poljubno ime besedilne spremenljivke, k ga želite spremeniti (procedura Mid).

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 Dolžina v proceduri Mid krajši od dolžine besedila, ki ga želite zamenjati, se besedilo skrajša na navedeno dolžino.

Besedilo: Niz, ki naj zamenja besedilni niz (procedura 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)   'vrne besedo "original"
  MsgBox text               ' besedilo ni spremenjeno
stmt1:
  Mid(text, 13, 8, "new")
  MsgBox text               ' vrne "This is the new Text"
func2:
  MsgBox Mid(start:=10, string:="The quick brown fox ..") ' pokaže " brown fox .."
stmt2:
  Mid text, 9, 12, "a new Phrase"
  MsgBox text               ' vrne "This is a new Phrase"
End Sub

Funkcije z nizi