Синтаксис

Right(string, length)

Синтаксис функции Right содержит следующие именованные аргументы:

Элемент Описание

string Обязательный. Строковое выражение, из которого извлекаются символы. Если string имеет значение Null, возвращается значение Null.

length Обязательный. Значение типа Variant (Long). Числовое выражение, указывающее число возвращаемых символов. Если 0, возвращается пустая строка (""). Если превышает число символов в строке string, возвращается вся строка.

Дополнительные сведения

Для определения числа символов в строке string следует использовать функцию Len.

Примечание. Эквивалентной функцией обработки строк по байтам является функция RightB. В этом случае аргумент length указывает число байт (а не символов), которые следует вернуть.

В данном примере функция Right используется для извлечения указанного числа последних символов строки.

Dim AnyString, MyStr

AnyString = "Всем привет" ' Инициализирует строку.

MyStr = Right(AnyString, 1) ' Возвращает "т"

MyStr = Right(AnyString, 7) ' Возвращает " привет".

MyStr = Right(AnyString, 20) ' Возвращает "Всем привет".

11) Trim

Возвращают значение типа Variant (String), содержащее копию строки, из которой удалены пробелы, находившиеся в начале строки (LTrim), в конце строки (RTrim) или в начале и конце строки (Trim).

Синтаксис

LTrim(строка)

RTrim(строка)

Trim(строка)

Обязательный аргумент строка представляет любое допустимое строковое выражение. Если строка имеет значение Null, возвращается значение Null.

В данном примере функции LTrim и RTrim используются для удаления пробелов, находившихся в начале и в конце строковой переменной, соответственно. Далее показано, что тоже результат может быть получен с помощью одной функции Trim.

Dim MyString, TrimString

MyString = " <-Trim-> " ' Инициализирует строку.

TrimString = LTrim(MyString) ' TrimString = "<-Trim-> ".

TrimString = RTrim(MyString) ' TrimString = " <-Trim->".

TrimString = LTrim(RTrim(MyString)) ' TrimString = "<-Trim->".

' Тот же результат можно получить с помощью одной функции Trim.

TrimString = Trim(MyString) ' TrimString = "<-Trim->".

12) Asc

Возвращает значение типа Integer, представляющее код символа для первого символа строки.

Синтаксис

Asc(строка)

Обязательный аргумент строка является любым допустимым строковым выражением. Если строка не содержит символов, возникает ошибка выполнения.

Дополнительные сведения

Возвращаемые значения лежат в диапазоне 0 – 255 для однобайтовых наборов, и в диапазоне -32768 – 32767 для двухбайтовых наборов символов (DBCS).

Примечание. Для работы с байтами данных, содержащихся в строке, предназначена другая функция (AscB). Вместо кода первого символа AscB возвращает первый байт. Функция AscW возвращает код символа, соответствующий кодировке Unicode, за исключением платформ, в которых Unicode не поддерживается и поведение функции аналогично функции Asc.

В данном примере функция Asc используется для определения кода символа, соответствующего первой букве в строке.

Dim MyNumber

MyNumber = Asc("A") ' Возвращает 65.

MyNumber = Asc("a") ' Возвращает 97.

MyNumber = Asc("Apple") ' Возвращает 65.

13) Chr

Возвращает значение типа String, содержащее символ, соответствующий указанному коду символа.