Funkce řetězce (Visual Basic)
Následující tabulka uvádí funkce, které Jazyk Visual Basic poskytuje ve Microsoft.VisualBasic.Strings třídě pro vyhledávání a manipulaci s řetězci. Mohou být považovány za vnitřní funkce jazyka Visual Basic; to znamená, že je nemusíte volat jako explicitní členy třídy, jak ukazují příklady. Další metody a v některých případech doplňkové metody jsou k dispozici ve System.String třídě.
| Metoda rozhraní .NET Framework | Popis |
|---|---|
| Asc, AscW | Integer Vrátí hodnotu představující kód znaku odpovídající znaku. |
| Chr, ChrW | Vrátí znak přidružený k zadanému kódu znaku. |
| Filter | Vrátí matici založenou na nule obsahující podmnožinu pole na základě zadaných String kritérií filtru. |
| Format | Vrátí řetězec formátovaný podle pokynů obsažených ve výrazu formátu String . |
| FormatCurrency | Vrátí výraz formátovaný jako hodnota měny pomocí symbolu měny definovaného v ovládacích panelech systému. |
| FormatDateTime | Vrátí řetězcový výraz představující hodnotu data a času. |
| FormatNumber | Vrátí výraz formátovaný jako číslo. |
| FormatPercent | Vrátí výraz formátovaný jako procento (tj. vynásobené 100) koncovým znakem %. |
| InStr | Vrátí celé číslo určující počáteční pozici prvního výskytu jednoho řetězce v jiném řetězci. |
| InStrRev | Vrátí pozici prvního výskytu jednoho řetězce v jiném, počínaje pravou stranou řetězce. |
| Join | Vrátí řetězec vytvořený spojením řady podřetězců obsažených v poli. |
| LCase | Vrátí řetězec nebo znak převedený na malá písmena. |
| Left | Vrátí řetězec obsahující zadaný počet znaků z levé strany řetězce. |
| Len | Vrátí celé číslo, které obsahuje počet znaků v řetězci. |
| LSet | Vrátí řetězec zarovnaný doleva obsahující zadaný řetězec upravený na zadanou délku. |
| LTrim | Vrátí řetězec obsahující kopii zadaného řetězce bez počátečních mezer. |
| Mid | Vrátí řetězec obsahující zadaný počet znaků z řetězce. |
| Replace | Vrátí řetězec, ve kterém byl zadaný podřetězce nahrazen jiným podřetězcem zadaného počtu. |
| Right | Vrátí řetězec obsahující zadaný počet znaků z pravé strany řetězce. |
| RSet | Vrátí řetězec zarovnaný doprava obsahující zadaný řetězec upravený na zadanou délku. |
| RTrim | Vrátí řetězec obsahující kopii zadaného řetězce bez koncových mezer. |
| Space | Vrátí řetězec skládající se z zadaného počtu mezer. |
| Split | Vrátí jednorozměrné pole založené na nule obsahující zadaný počet podřetědců. |
| StrComp | Vrátí hodnotu -1, 0 nebo 1 na základě výsledku porovnání řetězců. |
| StrConv | Vrátí řetězec převedený podle zadané hodnoty. |
| StrDup | Vrátí řetězec nebo objekt skládající se ze zadaného znaku, který se opakuje zadaný počet opakování. |
| StrReverse | Vrátí řetězec, ve kterém je pořadí znaků zadaného řetězce obrácené. |
| Trim | Vrátí řetězec obsahující kopii zadaného řetězce bez počátečních nebo koncových mezer. |
| UCase | Vrátí řetězec nebo znak obsahující zadaný řetězec převedený na velká písmena. |
Pomocí příkazu Option Compare můžete nastavit, jestli se řetězce porovnávají pomocí pořadí řazení textu bez rozlišování malých a velkých písmen určených národním prostředímText systému nebo interním binárním vyjádřením znaků (Binary). Výchozí metoda porovnání textu je Binary.
Příklad: UCase
Tento příklad používá UCase funkci k vrácení velké verze řetězce.
' String to convert.
Dim lowerCase As String = "Hello World 1234"
' Returns "HELLO WORLD 1234".
Dim upperCase As String = UCase(lowerCase)
Příklad: LTrim
Tento příklad používá LTrim funkci k prokládání úvodních mezer a RTrim funkce k prokládání koncových mezer z proměnné řetězce. Používá Trim funkci k prokládání obou typů mezer.
' 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)
Příklad: Mid
Tento příklad používá Mid funkci k vrácení zadaného počtu znaků z řetězce.
' 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)
Příklad: Len
Tento příklad používá Len k vrácení počtu znaků v řetězci.
' Initializes variable.
Dim testString As String = "Hello World"
' Returns 11.
Dim testLen As Integer = Len(testString)
Příklad: InStr
Tento příklad používá InStr funkci k vrácení pozice prvního výskytu jednoho řetězce v jiném.
' 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")
Příklad: Formát
Tento příklad ukazuje různé použití Format funkce k formátování hodnot pomocí String formátů i uživatelsky definovaných formátů. Pro oddělovač dat (/), oddělovač času (:) a indikátory AM/PM (t a tt), skutečný formátovaný výstup zobrazený systémem závisí na nastavení národního prostředí, které kód používá. Když se časy a data zobrazí ve vývojovém prostředí, použije se krátký formát času a krátký formát data národního prostředí kódu.
Poznámka:
V případě národních prostředí, které používají 24hodinový formát, se indikátory AM/PM (t a tt) nezobrazují nic.
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%")
