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

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

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

Метод .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

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

См. также

  • Last updated on