Funkcje ciągów (Visual Basic)

  • Artykuł

W poniższej tabeli wymieniono funkcje, które program Visual Basic udostępnia w Microsoft.VisualBasic.Strings klasie do wyszukiwania ciągów i manipulowania nimi. Można je traktować jako funkcje wewnętrzne języka Visual Basic; oznacza to, że nie musisz wywoływać ich jako jawnych składowych klasy, jak pokazano w przykładach. W klasie są dostępne System.String dodatkowe metody, a w niektórych przypadkach metody uzupełniające.

Metoda .NET Framework opis
Asc, AscW Zwraca wartość reprezentującą Integer kod znaku odpowiadający znakowi.
Chr, ChrW Zwraca znak skojarzony z określonym kodem znaku.
Filter Zwraca tablicę opartą na zerach zawierającą podzbiór tablicy String na podstawie określonych kryteriów filtrowania.
Format Zwraca ciąg sformatowany zgodnie z instrukcjami zawartymi w wyrażeniu formatu String .
FormatCurrency Zwraca wyrażenie sformatowane jako wartość waluty przy użyciu symbolu waluty zdefiniowanego w panelu sterowania systemu.
FormatDateTime Zwraca wyrażenie ciągu reprezentujące wartość daty/godziny.
FormatNumber Zwraca wyrażenie sformatowane jako liczba.
FormatPercent Zwraca wyrażenie sformatowane jako wartość procentowa (czyli pomnożone przez 100) z końcowym znakiem %.
InStr Zwraca liczbę całkowitą określającą pozycję początkową pierwszego wystąpienia jednego ciągu w innym.
InStrRev Zwraca położenie pierwszego wystąpienia jednego ciągu w innym, zaczynając od prawej strony ciągu.
Join Zwraca ciąg utworzony przez dołączenie kilku podciągów zawartych w tablicy.
LCase Zwraca ciąg lub znak przekonwertowany na małe litery.
Left Zwraca ciąg zawierający określoną liczbę znaków z lewej strony ciągu.
Len Zwraca liczbę całkowitą zawierającą liczbę znaków w ciągu.
LSet Zwraca ciąg wyrównany do lewej zawierający określony ciąg dostosowany do określonej długości.
LTrim Zwraca ciąg zawierający kopię określonego ciągu bez spacji wiodących.
Mid Zwraca ciąg zawierający określoną liczbę znaków z ciągu.
Replace Zwraca ciąg, w którym określony podciąg został zastąpiony innym podciągem o określonej liczbie razy.
Right Zwraca ciąg zawierający określoną liczbę znaków z prawej strony ciągu.
RSet Zwraca wyrównany do prawej ciąg zawierający określony ciąg dostosowany do określonej długości.
RTrim Zwraca ciąg zawierający kopię określonego ciągu bez spacji końcowych.
Space Zwraca ciąg składający się z określonej liczby spacji.
Split Zwraca tablicę jednowymiarową opartą na zerach zawierającą określoną liczbę podciągów.
StrComp Zwraca wartość -1, 0 lub 1 na podstawie wyniku porównania ciągów.
StrConv Zwraca ciąg przekonwertowany zgodnie z określonymi.
StrDup Zwraca ciąg lub obiekt składający się z określonego znaku powtórzonego określoną liczbę razy.
StrReverse Zwraca ciąg, w którym kolejność znaków określonego ciągu jest odwrócona.
Trim Zwraca ciąg zawierający kopię określonego ciągu bez spacji wiodących ani końcowych.
UCase Zwraca ciąg lub znak zawierający określony ciąg przekonwertowany na wielkie litery.

Możesz użyć instrukcji Option Compare , aby ustawić, czy ciągi są porównywane przy użyciu kolejności sortowania tekstu bez uwzględniania wielkości liter określonego przez ustawienia regionalne systemu (Text) lub przez wewnętrzne reprezentacje binarne znaków (Binary). Domyślną metodą porównania tekstu jest Binary.

Przykład: UCase

W tym przykładzie użyto UCase funkcji , aby zwrócić wielką wersję ciągu.

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

Przykład: LTrim

W tym przykładzie użyto LTrim funkcji do usuwania spacji wiodących i RTrim funkcji w celu usuwania spacji końcowych ze zmiennej ciągu. Używa Trim funkcji do usuwania obu typów spacji.

' 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)

Przykład: Mid

W tym przykładzie użyto Mid funkcji , aby zwrócić określoną liczbę znaków z ciągu.

' 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)

Przykład: Len

W tym przykładzie użyto Len metody , aby zwrócić liczbę znaków w ciągu.

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

Przykład: InStr

W tym przykładzie użyto InStr funkcji , aby zwrócić położenie pierwszego wystąpienia jednego ciągu w innym.

' 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")

Przykład: format

W tym przykładzie Format przedstawiono różne zastosowania funkcji do formatowania wartości przy użyciu String formatów i formatów zdefiniowanych przez użytkownika. W przypadku separatora daty (/), separatora czasu (:) i wskaźników AM/PM (t i tt) rzeczywiste sformatowane dane wyjściowe wyświetlane przez system zależą od ustawień regionalnych używanych przez kod. Kiedy godziny i daty są wyświetlane w środowisku deweloperów, używany jest format krótkiego czasu i format daty krótkiej ustawień regionalnych kodu.

Uwaga

W przypadku ustawień regionalnych korzystających z zegara 24-godzinnego wskaźniki AM/PM (t i tt) nie wyświetlają niczego.

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%")

Zobacz też