Определение длины строки

Для определения количества символов в строке (не считая кавычек) применяется функция Len(S),где

S – строка символов.

Результат будет иметь тип Integer

Пример 7:

Sub Строки7()

Dim S As String

Dim N As Integer

A="Строковая переменная"

N=Len(S) 'Результат: N=20

End Sub

Выделение подстроки из строки символов

Для выделения подстроки из строки используются функции Left(S,N), Right(S,N), Mid(S, Start, N), где:

S – строка;

N – количество выделяемых символов;

Start – позиция начала замены.

Описание и назначение этих функций приведено в таблице 3.

Таблица 3

Описание и назначение функций Left, Right, Mid

Функция	Назначение	Тип аргумента	Тип результата
Left(S,N) Right(S,N) Mid(S, Start, N)	Выделяет N символов слева Выделяет N символов справа Выделяет N символов начиная с позиции start	S – String N – Byte Start – Byte	String

Пример 8:

Sub Строки8()

Dim S As String

Dim S1 As String

S=" Моя строковая переменная"

S1=Left(S, 3) 'Результат: S="Моя"

S1=Right(S, 10) 'Результат: S="переменная"

S1=mid(S, 5,9) 'Результат: S="строковая"

End Sub

Определение позиции вхождения подстроки в строку

Для определения позиции вхождения подстроки в строку используются функции InStr([start, ] S1, S2[, compare]) InStrRev(S1, S2[, start[, compare]]), где:

start – позиция начала поиска;

S1 – строка, в которой будет происходить поиск;

S2 – подстрока, которую будем искать в строке S1;

compare – способ сравнения.

Описание и назначение этих функций приведено в таблице 4.

Таблица 4

Описание и назначение функций InStr и InStrRev

Функция	Назначение	Тип аргумента	Тип результата
InStr([start, ] S1, S2[, compare]) InStrRev(S1, S2[, start[, compare]])	Определяет позицию первого вхождения подстроки S2 в строку S1 Определяет позицию последнего вхождения подстроки S2 в строку S1	start – Byte S1 – String S2 – Srting compare – 0 или 1 (по умолчанию 0)	Byte

Пример 9:

Sub Строки9()

Dim S As String

Dim S1 As String

Dim N As Byte

S=" Моя строковая переменная"

S1="о"

N= InStr(S, S1) 'Результат: N=2

N= InStrRev(S, S1) 'Результат: N=9

End Sub

Преобразование элементов массива в строку

Для преобразования элементов массива в строку можно использовать функцию, Join( array[, delimiter]), где:

array – массив, который нужно преобразовать;

delimiter – символ, который будет разделять элементы массива в конечной строке (по умолчанию пробел).

Преобразование строки в массив

Для преобразования строки в массив используется функция Split(S[, delimiter[, limit[, compare]]]), где

S – строка, которую нужно преобразовать в массив

delimiter – символ, который нужно принять за разделитель элементов массива (по умолчанию пробел);

limit – ограничение возвращаемых элементов;

compare – способ сравнения.