Функция Mid

Връща указаната част от низ (функция Mid) или заменя част от низ с друг низ (процедура Mid).

Синтаксис:


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)

Резултат:

String (само за функцията)

Параметри:

string: произволен израз със стойност низ, от който искате да извлечете част (функция Mid). Име на произволна текстова променлива, която искате да промените (процедура Mid).

Start: числов израз, който задава началната позиция за замяна на текст или за извличане на резултат. Минималната разрешена стойност е 1. Максималната разрешена стойност е 2 147 483 648.

Length: числов израз, който задава колко знака искате да замените или извлечете. Максималната разрешена стойност е 2 147 483 648.

Ако параметърът Length бъде пропуснат във функцията Mid, се връщат всички знаци от началната позиция до края на низа.

Ако параметърът Length на процедурата Mid е по-малък от дължината на текста, който искате да замените, текстът се скъсява до зададената дължина.

Text: низът, с който се замества (процедура Mid).

Кодове за грешка:

5 Невалидно извикване на процедура

Пример:


Sub ExampleMid_Function_and_Statement
  text = "This is the original Text"
func1:
  MsgBox Mid(text, 13, 8)   ' връща думата "original"
  MsgBox text               ' текстът не е променен
stmt1:
  Mid(text, 13, 8, "new")
  MsgBox text               ' връща "This is the new Text"
func2:
  MsgBox Mid(start:=10, string:="The quick brown fox ..") ' показва " brown fox .."
stmt2:
  Mid text, 9, 12, "a new Phrase"
  MsgBox text               ' връща "This is a new Phrase"
End Sub

Функции за низове