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

Статья
03/12/2024

В следующей таблице перечислены функции, предоставляемые Visual Basic в Microsoft.VisualBasic.Strings классе для поиска строк и управления ими. Они могут рассматриваться как встроенные функции Visual Basic; То есть их не нужно вызывать как явные члены класса, как показано в примерах. Дополнительные методы и в некоторых случаях дополнительные методы доступны в System.String классе.

метод платформа .NET Framework	Description
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

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

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

Пример: LTrim

В этом примере функция используется 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

В этом примере функция используется 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%")