2.10 Обработка строковой информации

1) При объединении двух и более строк используется операция называемая конкатенацией, которая реализуется с помощью оператора &. Например:

Dim strA, strB, strC As String

strA = "Строковая "

strB = "переменная"

strC = strA & strB ‘Результат: "Строковая переменная"

Помимо оператора &, объединять строки можно также при помощи сложения. Например: strC = strA + strB.

2) В том случае, когда необходимо преобразовать величину числового типа в строку, следует использовать функцию CStr, указывая в качестве параметра изменяемую переменную. Например:

Dim strA, strC As String

Dim sngB As Single

strA = "X = "

sngB = 45.77

strC = strA + CStr(sngB) ‘Результат: "Х= 45.77"

3) В языке VBA существует возможность изменения строки таким образом, чтобы все используемые в ней буквы были преобразованы либо в верхний регистр (ВСЕ ПРОПИСНЫЕ), либо в нижний (все строчные). Для этих целей используются, соответственно, функции UCase и LCase. Например:

Dim strA, strB As String

strA = "Строковая Переменная"

strB = UCase(strA) ‘Результат: "СТРОКОВАЯ ПЕРЕМЕННАЯ"

strB = LCase(strA) ‘Результат: "строковая переменная"

4) Для того чтобы заменить какую-либо часть строки или определенные символы, следует использовать функцию Replace. Например:

Dim strA, strB As String

strA = "Строковая Переменная"

strB = Replace(strA, "овая", "а -") ‘Результат: "Строка - Переменная"

strB = Replace(strA, "о", "О") ‘Результат: " СтрОкОвая Переменная"

Кроме обязательных параметров - результирующей, заменяемой и заменяющей строк - могут также использоваться необязательные параметры, а именно: позиция в строке для начала замены и количество возможных изменений. Следует отметить, что при этом часть строки, которая расположена перед позицией начала замены, будет удалена. Например:

strB = Replace(strA, "e", "Е", 10, 3) ‘Результат: "ПЕрЕмЕнная"

strB = Replace(strA, "о", "О", 1, 1) ‘Результат: "СтрОковая Переменная"

5) Для определения количества символов применяется функция Len, при этом в качестве параметра указывается рассматриваемая строка. Например:

Dim strA As String

Dim intA As Integer

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

intA = Len (strA) ‘Результат: 20

6) Если в программе возникает необходимость выделения из строковой переменной той или иной ее части, то в этом случае следует использовать одну из функций: Left, Right или Mid.

Функция Left применяется для выделения подстроки в начале исходной строки. Формат данной функции следующий:

Left(строка, количество)

Результатом функции Left является строка с указанным количеством символов, находящаяся в начале исходной строки.

Функция Right используется при выделении подстроки в конце исходной строки. Функция имеет формат:

Right(строка, количество)

Результатом функции Right является строка с указанным количеством символов, расположенная в конце исходной строки.

Функция Mid применяется для выделения подстроки в середине исходной строки. Данная функция имеет следующий формат:

Mid (строка, номер, [количество])

Результатом функции Mid является строка с указанным количеством символов, находящаяся в исходной строке, начиная с определенного номера.

Пример использования рассмотренных функций.

Dim strA, strВ As String

strA = "Это строковая переменная"

strB = Left(strA, 3) ‘Результат: "Это"

strB = Right (strA, 10) ‘Результат: "переменная"

strB = Mid(strA, 5, 9) ‘Результат: "строковая"