Chr(кодСимвола)

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

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

Коды 0–31 соответствуют стандартным управляющим символам ASCII. Например, Chr(10) возвращает символ перевода строки. Обычным диапазоном значений аргумента кодСимвола является интервал 0–255. Однако в системах DBCS допустимыми являются значения аргумента кодСимвола от -32768 до 65536.

Примечание. Эквивалентной функцией побайтовой обработки значений типа String является функция ChrB. Эта функция всегда возвращает один байт, а не символ, который может занимать один или два байта. Функция ChrW возвращает значение типа String, содержащее символ в основном формате Unicode, за исключением платформ, в которых Unicode не поддерживается и функция работает аналогично функции Chr.

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

Dim MyChar

MyChar = Chr(65) ' Возвращает A.

MyChar = Chr(97) ' Возвращает a.

MyChar = Chr(62) ' Возвращает >.

MyChar = Chr(37) ' Возвращает %.

Instr

Возвращает значение типа Variant (Long), указывающее позицию первого вхождения одной строки внутри другой строки.

Синтаксис

InStr([start, ]string1, string2[, compare])

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

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

start Необязательный. Числовое выражение, задающее позицию, с которой начинается каждый поиск. Если этот аргумент опущен, поиск начинается с первого символа строки. Если start имеет значение Null, возникает ошибка. Указание аргумента start является обязательным, если указан аргумент compare.

string1 Обязательный. Строковое выражение, в котором выполняется поиск.

string2 Обязательный. Искомое строковое выражение.

compare Необязательный. Указывает способ сравнения строк. Аргумент compare может быть опущен или иметь значение 0, 1 или 2. Чтобы выполнить двоичное сравнение, следует указать 0 (это значение используется по умолчанию). Чтобы выполнить посимвольное сравнение без учета регистра, следует указать 1. Только в Microsoft Access допускается использование значения 2 для выполнения сравнения на основании сведений, содержащихся в базе данных. Если аргумент compare имеет значение Null, возникает ошибка. Если аргумент compare опущен, способ сравнения строк определяется значением параметра инструкции Option Compare.

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

Условия Значение функции InStr

string1 является пустой строкой 0

string1 имеет значение Null Пустое значение

string2 является пустой строкой start

string2 имеет значение Null Пустое значение

string2 не найдена 0

string2 найдена в string1 Позиция обнаруженной подстроки

start > string2 0

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

Эквивалентной функцией обработки строк по байтам является функция InStrB, которая возвращает позицию байта (а не символа), соответствующую положению одной строки внутри другой строки.

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

Dim SearchString, SearchChar, MyPos

SearchString ="XXpXXpXXPXXP" ' Исходная строка.

SearchChar = "P" ' Следует найти "P".

' Посимвольное сравнение, начиная с позиции 4. Возвращает 6.

MyPos = Instr(4, SearchString, SearchChar, 1)

' Двоичное сравнение, начиная с позиции 1. Возвращает 9.

MyPos = Instr(1, SearchString, SearchChar, 0)

' Сравнение является двоичным по умолчанию (последний аргумент опущен).

MyPos = Instr(SearchString, SearchChar) ' Возвращает 9.

MyPos = Instr(1, SearchString, "W") ' Возвращает 0.

MID

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

Синтаксис

Mid(string, start[, length])

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

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

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

start Обязательный. Значение типа Long. Позиция символа в строке string, с которого начинается нужная подстрока. Если start больше числа символов в строке string, функция Mid возвращает пустую строку ("").

length Необязательный. Значение типа Variant (Long). Число возвращаемых символов. Если этот аргумент опущен или превышает число символов, расположенных справа от позиции start, то возвращаются все символы от позиции start до конца строки.

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

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

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

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

Dim MyString, FirstWord, LastWord, MidWords

MyString = "Пример функции Mid" ' Инициализирует строку.

FirstWord = Mid(MyString, 1, 6) ' Возвращает "Пример".

LastWord = Mid(MyString, 16, 3) ' Возвращает "Mid".

MidWords = Mid(MyString, 8) ' Возвращает "функции Mid".

Дата добавления: 2015-07-24