IBM Lotus Symphony


Функция Mid, Оператор Mid [встроенные]

Возвращает указанную часть строкового выражения (функция Mid), либо заменяет часть строкового выражения на другую строку (оператор Mid).

Синтаксис:

Mid (Текст As String, Начало As Long [, Длина As Long]) или Mid (Текст As String, Начало As Long , Длина As Long, Текст As String)

Возвращаемое значение:

String (только в случае функции)

Параметры:

Начало: целочисленное выражение, задающее начальную позицию заменяемой или возвращаемой части строки.

Start: числовое выражение, задающее длину заменяемой или возвращаемой части строки. Максимальное допустимое значение - 65535.

Длина: числовое выражение, задающее число заменяемых или возвращаемых символов. Максимальное допустимое значение - 65535.

Если параметр Длина в операторе Mid меньше длины вставляемого текста, то текст сокращается до указанной длины.

Если параметр Длина в операторе Mid меньше длины текста, который вы хотите заменить, то текст сокращается до указанной длины.

Текст: Строка, замещающая строковое выражение ( оператор Mid ).

Коды ошибок

5 Недопустимый вызов процедуры

Пример:

Sub ExampleUSDate

Dim sInput As String

Dim sUS_date As String

sInput = InputBox("Введите дату в международном формате 'ГГГГ-ММ-ДД'")

sUS_date = Mid(sInput, 6, 2)

sUS_date = sUS_date & "/"

sUS_date = sUS_date & Right(sInput, 2)

sUS_date = sUS_date & "/"

sUS_date = sUS_date & Left(sInput, 4)

MsgBox sUS_date

End Sub


Комментарии по продукту | Дополнительная документация | Товарные знаки