Поделиться через

Строковые функции (Visual Basic)

  • Статья

В следующей таблице перечислены имеющиеся в Visual Basic функции поиска в строках и работы с ними.

Метод .NET Framework

Описание

Asc, AscW

Возвращает значение типа Integer, представляющее код знака, соответствующий знаку.

Chr, ChrW

Возвращает знак, связанный с указанным кодом знака.

Filter

Возвращает массив (с индексацией от нуля), который содержит подмножество массива типа String, выделяемое согласно указанным условиям фильтрации.

Format

Возвращает строку, отформатированную в соответствии с инструкциями, содержащимися в формате выражения String.

FormatCurrency

Возвращает выражение в формате денежной единицы с использованием символа денежной единицы, определенного в системной панели управления.

FormatDateTime

Возвращает строковое выражение, представляющее значение даты и времени.

FormatNumber

Возвращает выражение в формате числа.

FormatPercent

Возвращает выражение в формате процента (т. е. с коэффициентом 100), в конец которого добавлен знак %.

InStr

Возвращает целое число, указывающее начальную позицию первого вхождения одной строки в другую.

InStrRev

Возвращает позицию первого вхождения одной строки в другую, начиная с правого конца строки.

Join

Возвращает строку, образуемую путем соединения нескольких подстрок, содержащихся в массиве.

LCase

Возвращает строку или символ, преобразованные в нижний регистр.

Left

Возвращает строку, содержащую указанное число знаков с левой стороны строки.

Len

Возвращает целое число, показывающее число знаков в строке.

LSet

Возвращает выровненную по левому краю строку запрашиваемой длины, содержащую указанную строку.

LTrim

Возвращает строку, содержащую копию указанной строки без пробелов в начале.

Mid

Возвращает строку, содержащую указанное число знаков строки.

Replace

Возвращает строку, в которой указанная подстрока заданное число раз заменена другой подстрокой.

Right

Возвращает строку, содержащую указанное число знаков с правой стороны строки.

RSet

Возвращает выровненную по правому краю строку, содержащую указанную строку, настроенную под указанную длину.

RTrim

Возвращает строку, содержащую копию указанной строки без пробелов в конце.

Space

Возвращает строку, состоящую из указанного числа пробелов.

Split

Возвращает одномерный массив (с индексацией от нуля), содержащий указанное число подстрок.

StrComp

Возвращает -1, 0 или 1 в зависимости от результата сравнения строк.

StrConv

Возвращает строку, преобразованную как указано.

StrDup

Возвращает строку или объект, состоящие из указанного знака, повторенного определенное количество раз.

StrReverse

Возвращает строку, содержащую те же знаки, что и в заданной строке, но в противоположном порядке.

Trim

Возвращает строку, содержащую копию указанной строки без пробелов в начале и конце.

UCase

Возвращает строку или знак, содержащий указанную строку, преобразованную в верхний регистр.

С помощью оператора Option Compare можно указать, следует ли выполнять сравнение строк с использованием порядка сортировки текста без учета регистра, определяемого языковым стандартом системы (Text), или же вести сортировку по внутренним двоичным представлениям знаков (Binary).По умолчанию задан метод сравнения текста Binary.

Пример

В данном примере функция UCase используется для возврата строки в верхнем регистре.

' String to convert.
Dim LowerCase As String = "Hello World 1234"
' Returns "HELLO WORLD 1234".
Dim UpperCase As String = UCase(LowerCase)

В данном примере функция LTrim используется, чтобы убрать пробелы в начале, а функция RTrim — чтобы убрать пробелы в конце строковой переменной.Функция Trim в примере используется для удаления обоих типов пробелов.

' Initializes string.
Dim TestString As String = "  <-Trim->  "
Dim TrimString As String
' Returns "<-Trim->  ".
TrimString = LTrim(TestString)
' Returns "  <-Trim->".
TrimString = RTrim(TestString)
' Returns "<-Trim->".
TrimString = LTrim(RTrim(TestString))
' Using the Trim function alone achieves the same result.
' Returns "<-Trim->".
TrimString = Trim(TestString)

В данном примере функция Mid используется для возврата указанного числа знаков строки.

' Creates text string.
Dim TestString As String = "Mid Function Demo"
' Returns "Mid".
Dim FirstWord As String = Mid(TestString, 1, 3)
' Returns "Demo".
Dim LastWord As String = Mid(TestString, 14, 4)
' Returns "Function Demo".
Dim MidWords As String = Mid(TestString, 5)

В данном примере Len используется для возврата числа знаков в строке.

' Initializes variable.
Dim TestString As String = "Hello World"
' Returns 11.
Dim TestLen As Integer = Len(TestString)

В данном примере функция InStr используется для возврата позиции первого вхождения одной строки в другую.

' String to search in.
Dim SearchString As String = "XXpXXpXXPXXP"
' Search for "P".
Dim SearchChar As String = "P"

Dim TestPos As Integer
' A textual comparison starting at position 4. Returns 6.
TestPos = InStr(4, SearchString, SearchChar, CompareMethod.Text)

' A binary comparison starting at position 1. Returns 9.
TestPos = InStr(1, SearchString, SearchChar, CompareMethod.Binary)

' If Option Compare is not set, or set to Binary, return 9.
' If Option Compare is set to Text, returns 3.
TestPos = InStr(SearchString, SearchChar)

' Returns 0.
TestPos = InStr(1, SearchString, "W")

В данном примере показаны различные способы использования функции Format для форматирования значений с применением как форматов String, так и определенных пользователем форматов.Фактическое отображение системой разделителя даты (/), разделителя времени (: и индикаторов AM/PM (t и tt) зависит от региональных параметров, применяемых кодом.При отображении времени и даты в среде разработки используется короткий формат времени и даты региональных установок кода.

ПримечаниеПримечание

Для языков, использующих 24-часовой формат, индикаторы AM/PM (t и tt) не отображаются.

 
Dim TestDateTime As Date = #1/27/2001 5:04:23 PM#
Dim TestStr As String
' Returns current system time in the system-defined long time format.
TestStr = Format(Now(), "Long Time")
' Returns current system date in the system-defined long date format.
TestStr = Format(Now(), "Long Date")
' Also returns current system date in the system-defined long date 
' format, using the single letter code for the format.
TestStr = Format(Now(), "D")

' Returns the value of TestDateTime in user-defined date/time formats.
' Returns "5:4:23".
TestStr = Format(TestDateTime, "h:m:s")
' Returns "05:04:23 PM".
TestStr = Format(TestDateTime, "hh:mm:ss tt")
' Returns "Saturday, Jan 27 2001".
TestStr = Format(TestDateTime, "dddd, MMM d yyyy")
' Returns "17:04:23".
TestStr = Format(TestDateTime, "HH:mm:ss")
' Returns "23".
TestStr = Format(23)

' User-defined numeric formats.
' Returns "5,459.40".
TestStr = Format(5459.4, "##,##0.00")
' Returns "334.90".
TestStr = Format(334.9, "###0.00")
' Returns "500.00%".
TestStr = Format(5, "0.00%")

См. также

Ссылки

Члены библиотеки времени выполнения Visual Basic

Сводка по работе со строками (Visual Basic)

Сравнение ключевых слов в разных языках

Другие ресурсы

Ключевые слова (Visual Basic)