Funkce Mid, příkaz Mid

Vrátí určenou část řetězce (funkce Mid) nebo nahradí část řetězce jiným řetězcem (příkaz Mid).

Syntaxe:


Mid (Text As String, Start As Long [, Length As Long])
Mid (Text As String, Start As Long, Length As Long, Text As String)

Návratová hodnota:

Typu String (jen v případě funkce)

Parametry:

Text: Řetězec, který chcete upravit.

Začátek: Číselný výraz určující pozici znaku, kde začíná část řetězce, kterou chcete nahradit nebo vrátit. Minimální povolená hodnota je 1. Maximální povolená hodnota je 2 147 483 648.

Délka: Číselný výraz určující počet znaků, které chcete nahradit nebo vrátit. Maximální povolená hodnota je 2 147 483 648.

Je-li ve funkci Mid vynechán parametr Délka, vrátí se všechny znaky od počáteční pozice do konce řetězce.

Je-li v příkazu Mid parametr Délka menší než délka textu, kterým chcete nahradit, text bude zkrácen na určenou délku.

Text: Řetězec, kterým chcete nahradit určenou část řetězce (příkaz Mid).

Chybové kódy:

5 Neplatné volání procedury

Příklad:


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