inStr, XnStrRev возвращают позиции первого вхождения подстроки в данную строку, начиная соответственно с начала и с конца. Если вхождения нет, то возвращается 0.

↑

▷ Содержание

⇐ ПредыдущаяСтр 3 из 5Следующая ⇒

StrReverse.

Поиск и замена вхождения в строку подстроки, замена всех специфицированных подстрок в рабочем листе

inStr, XnStrRev возвращают позиции первого вхождения подстроки в данную строку, начиная соответственно с начала и с конца. Если вхождения нет, то возвращается 0.

Синтаксис:

InStr ([Start,] StringCheck, StringMath [,Compare])

InStrRev(StringCheck, StringMath [, Start] [, Compare]),где StringCheck строковое выражение, в котором выполняет­ся поиск; StringMath ^ искомое строковое выражение; start — выражение (числовое), задающее позицию, с которой начинается каждый поиск. Если этот параметр опущен, то поиск начинает­ся с первого символа строки. Compare указывает способ срав­нения строк (vbBinaryCompare или 0 — двоичное сравнение, vbTextCompare или 1 — посимвольное сравнение без учета ре­гистра).

Replace (Exp, Find, Replacewith [,Start [,Count

[Compare]]]),где Exp — выражение, Find — заменяемая под­строка, Replaeew-ifeh — на что заменяется, St&rt — позиция, с которой ищется заменяемая подстрока, Count — количество най­денных строк, которые надо заменить.

Метод Replaceобъекта Rangeпозволяет произвести замену подстроки в указанной ячейке.

Среди рассмотренных функций можно выделить несколько базовых, с помощью которых получаются все остальные. Клю­чевыми функциями являются операции конкатенации (слияния) строк, сравнения (равно, больше, меньше), Mid$ (оператор), Mid$ (функция), Asc и Chr$.

В более ранних версиях VBA для операции конкатенации ис­пользовался только знак «+». Однако в VBA 3.0 стало возможным применять и знак «&» (амперсанд). Их принципиальное различие заключается в том, что «+» подразумевает наличие переменных и выражений только строкового типа, а «&» допускает любые типы (они автоматически преобразуются в строковые).

Symboll$ - Symbol2$ & 10

Symboll$ = Symboi2$ + 10, 'приведет к появлению

ошибки (недопустимый тип операнда)

Symboll$ « Symbol2$ + Str$(10)

Использование строк и байтовых массивов VBA обеспечивает простой способ преобразования строк в байтовые массивы и наоборот.

SubStringToByteAtrayО Dim strtext As String Dirti aByt() As^Bytfe Dim inti As'Integer strtext = "Helio'* aByt() — strtext* *

' For inti '=*» IbBoia&a(a-Byt) I Фо fifBOund<aByt} ¹ I Debug*, Prittt t (IntI I

Nexiy^lritr ™ ’ DebugvPrint -■ strtext = aByfe’O ||Щ|

•‘••‘’'ВёЬид^Profit щВШШщ p ■ End SOb

Результат работы подпрограммы:

yjj ° Be i9⁸_wQ янш н

Сравнение строк при помощи оператора LikeОператор Likeиспользует строку-шаблон (табл. 8).

Познавательные статьи:



Техника прыжка в длину с разбега

Организация работы процедурного кабинета

Области применения синхронных машин

Оптимизация по Винеру и Калману