| |
Функция InStrRev | новая функция в VB6! | Синтаксис InStrRev(stringcheck, stringmatch[, start[, compare]]) | Функция служит для поиска номера символа, с которого начинается в заданной строке образец поиска. Поиск идет от указанной позиции справа налево. Для поиска вхождения с начала строки используйте функцию InStr. | Параметры Наименование | Описание | StringCheck | Обязательный. Строковое выражение, в котором проводится поиск |
StringMatch | Обязательный. Строковое выражение - образец поиска |
Start | Необязательный. Числовое выражение, устанавливающее начальную позицию для каждого поиска. Если этот параметр опущен, используется значение –1, задающее начало поиска с позиции последнего символа. Если параметр Start содержит Null, возникает ошибка
| Compare | Необязательный. Задает тип сравнения для строк. Если значение параметра Compare равно Null, возникает ошибка. В том случае, когда параметр Compare опущен, тип сравнения определяется установками оператора Option Compare. Может принимать одно из следующих значений:
vbUseCompareOption=-1
Используются установки, задаваемые оператором Option Compare. Используется по умолчанию
vbBinaryCompare=0
Двоичное сравнение. Сравнение строк производится по внутренним кодам символов, определяемых кодовой страницей. Буквы разных регистров считаются разными
vbTextCompare=1
Текстовое сравнение. Сравнение строк без учета регистра на основе системной национальной настройки
vbDatabaseCompare=2
Сравнение на основе установок, принятых в обрабатываемой базе данных. Применяется в MS Access |
| Замечания
| StringCheck имеет нулевую
длину |
0 |
| StringCheck имеет значение
Null |
Null |
| StringMatch имеет нулевую
длину |
Значение параметра Start |
| StringMatch имеет значение
Null |
Null |
| StringMatch не найдена |
0 |
| StringMatch найдена внутри
StringCheck |
Позиция, начиная с
которой найдено совпадение |
| Start > Len(StringMatch) |
0 |
| Пример использования Dim SearchString, SearchChar, MyPos
SearchString ="XXpXXpXXPXXP" 'строка, в которой будем искать
SearchChar = "P" 'будем искать символ "P"
'бинарное сравнение строк начиная с позиции 10, возвращает 9
MyPos = InStrRev(SearchString, SearchChar, 10, 0)
'сравнение строк как текст начиная со следующей позиции, возвращает 12
MyPos = InStrRev(SearchString, SearchChar, -1, 1)
'бинарное сравнение строк по умолчанию (последний аргумент пропущен)
MyPos = InStrRev(SearchString, SearchChar, 8) 'возвращает 0 | Дополнительная информация Категория: Обработка массивов и строк Еще функции: Array, Asc, Filter, InStr, InStrRev, Join, LBound, LCase, Left, Len, LTrim, Mid, Partition, Replace, Right, RTrim, Space, Spc, Split, StrComp, StrConv, String, StrReverse, Tab, Trim, UBound, UCase |
|
|
Справочник по Visual Basic