Основные функции для работы со строками

Рассмотрим основные функции для работы со строками:

Dim s As String
s = "Строка"
Debug.Print Len(s) ' 6
s = "     Строка     "
Debug.Print "'" & Trim(s) & "'" ' 'Строка'

Функция Trim() возвращает значение типа Variant (String). Чтобы получить значение типа String следует использовать функцию Trim$(), имеющую тот же самый формат. Пример:

s = "     Строка     "
Debug.Print "'" & Trim$(s) & "'" ' 'Строка'
s = "     Строка     "
Debug.Print "'" & LTrim(s) & "'" ' 'Строка     '

Функция LTrim() возвращает значение типа Variant (String). Чтобы получить значение типа String следует использовать функцию LTrim$(), имеющую тот же самый формат. Пример:

s = "     Строка     "
Debug.Print "'" & LTrim$(s) & "'" ' 'Строка     '
s = "     Строка     "
Debug.Print "'" & RTrim(s) & "'" ' '     Строка'

Функция RTrim() возвращает значение типа Variant (String). Чтобы получить значение типа String следует использовать функцию RTrim$(), имеющую тот же самый формат. Пример:

s = "     Строка     "
Debug.Print "'" & RTrim$(s) & "'" ' '     Строка'
Debug.Print Mid("строка", 1)    ' строка
Debug.Print Mid("строка", 1, 3) ' стр
Debug.Print Mid("строка", 2, 1) ' т

Функция Mid() возвращает значение типа Variant (String). Чтобы получить значение типа String следует использовать функцию Mid$(), имеющую тот же самый формат. Пример:

Debug.Print Mid$("строка", 1, 3) ' стр

Если функция Mid() расположена слева от оператора присваивания, то можно заменить фрагмент другой строкой. Если длина нового фрагмента больше длины старого фрагмента, то новый фрагмент будет обрезан. Пример:

Dim s As String
s = "строка"
Mid(s, 1, 1) = "7"
Debug.Print s ' 7трока
Mid(s, 1, 2) = "787"
Debug.Print s ' 78рока
Mid(s, 1, 2) = "9"
Debug.Print s ' 98рока
Debug.Print MidB("строка", 1, 6) ' стр

Функция MidB() возвращает значение типа Variant (String). Чтобы получить значение типа String следует использовать функцию MidB$(), имеющую тот же самый формат. Пример:

Debug.Print MidB$("строка", 1, 6) ' стр

Если функция MidB() расположена слева от оператора присваивания, то можно заменить фрагмент другой строкой. Пример:

Dim s As String
s = "строка"
MidB(s, 1, 2) = "7"
Debug.Print s ' 7трока
Debug.Print Left("строка", 1) ' с
Debug.Print Left("строка", 4) ' стро
Debug.Print Left("строка", 9) ' строка

Функция Left() возвращает значение типа Variant (String). Чтобы получить значение типа String следует использовать функцию Left$(), имеющую тот же самый формат. Пример:

Debug.Print Left$("строка", 4) ' стро
Debug.Print LeftB("строка", 4) ' ст

Функция LeftB() возвращает значение типа Variant (String). Чтобы получить значение типа String следует использовать функцию LeftB$(), имеющую тот же самый формат. Пример:

Debug.Print LeftB$("строка", 4) ' ст
Debug.Print Right("строка", 1) ' а
Debug.Print Right("строка", 4) ' рока
Debug.Print Right("строка", 9) ' строка

Функция Right() возвращает значение типа Variant (String). Чтобы получить значение типа String следует использовать функцию Right$(), имеющую тот же самый формат. Пример:

Debug.Print Right$("строка", 4) ' рока
Debug.Print RightB("строка", 4) ' ка

Функция RightB() возвращает значение типа Variant (String). Чтобы получить значение типа String следует использовать функцию RightB$(), имеющую тот же самый формат. Пример:

Debug.Print RightB$("строка", 4) ' ка
Debug.Print "'" & Space(5) & "'" ' '     '

Функция Space() возвращает значение типа Variant (String). Чтобы получить значение типа String следует использовать функцию Space$(), имеющую тот же самый формат. Пример:

Debug.Print "'" & Space$(5) & "'" ' '     '
Debug.Print String(5, "N")   ' NNNNN
Debug.Print String(5, "Npt") ' NNNNN
Debug.Print String(5, 78)    ' NNNNN

Функция String() возвращает значение типа Variant (String). Чтобы получить значение типа String следует использовать функцию String$(), имеющую тот же самый формат. Пример:

Debug.Print String$(5, "N")   ' NNNNN
Debug.Print StrReverse("строка") ' акортс
Предыдущая статья Все статьи Следующая статья