Funkce řetězce (Visual Basic)

V následující tabulce jsou uvedeny funkce, které Visual Basic poskytuje pro vyhledávání a manipulaci s řetězci.

Metoda rozhraní .NET Framework	Description
Asc, AscW	Vrátí hodnotu Integer představující kód znaku pro odpovídající znak.
Chr, ChrW	Vrátí znak spojený se zadaným kódem znaku.
Filter	Vrátí pole vycházející z nuly a obsahující podmnožinu polí String podle zadaných 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 na ovládacím panelu 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 procentuální údaj (tj. vynásobený číslem 100) zakončený znakem %.
InStr	Vrátí celé číslo, které určuje počáteční pozici prvního výskytu jednoho řetězce v jiném.
InStrRev	Vrátí pozici prvního výskytu jednoho řetězce v jiném počínaje od pravé strany řetězce.
Join	Vrátí řetězec vytvořený spojením řady dílčích řetězců, které jsou obsaženy 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 představující počet znaků v řetězci.
LSet	Vrátí řetězec zarovnaný doleva a 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ý dílčí řetězec nahrazen jiným dílčím řetězcem tolikrát, kolikrát jste zadali.
Right	Vrátí řetězec obsahující zadaný počet znaků z pravé strany řetězce.
RSet	Vrátí řetězec zarovnaný doprava a 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 sestávající ze zadaného počtu mezer.
Split	Vrátí jednorozměrné pole vycházející z nuly a obsahující zadaný počet podřetězců.
StrComp	Vrátí hodnotu -1, 0 nebo 1 podle výsledku porovnání řetězců.
StrConv	Vrátí řetězec, který je převeden podle zadání.
StrDup	Vrátí řetězec nebo objekt tvořený zadaným znakem tolikrát, kolikrát jste zadali.
StrReverse	Vrátí řetězec, ve kterém je obrácené pořadí znaků ze zadaného řetězce.
Trim	Vrátí řetězec obsahující kopii zadaného řetězce bez počátečních a koncových mezer.
UCase	Vrátí řetězec nebo znak obsahující zadaný řetězec převedený na velká písmena.

Lze použít příkaz Option Compare pro nastavení, zda jsou řetězce porovnány pomocí řazení nerozlišujícího velikost písmen textu podle národního prostředí systému (Text) nebo vnitřní binární reprezentace znaků (Binary).Výchozí metoda porovnání textu je Binary.

Příklad

V tomto příkladu se funkce UCase použije k vrácení verze řetězce s velkými písmeny.

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

V tomto příkladu se funkce LTrim použije pro odstranění úvodních mezer a funkce RTrim pro odstranění koncových mezer z proměnné řetězce.Používá funkci Trim pro odstraně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)

Tento příklad používá funkci Mid k vrácení určeného počtu znaků v řetězci.

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

V tomto příkladu Len se použije 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)

V tomto příkladu funkce InStr se použije 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")

Tento příklad ukazuje různé možnosti použití funkce Format pro formátování hodnot pomocí formátu String i formátu definovaných uživatelem.Pro oddělovač data (/), oddělovač času (:) a indikátory dop/odp (t a tt) závisí skutečný formátovaný výstup zobrazený v systému na nastavení národního prostředí, které kód používá.Když se časy a data zobrazí ve vývojovém prostředí, je použit krátký formát času a krátký formát data národního prostředí kódu.

[!POZNÁMKA]

Pro národní prostředí používající 24hodinový formát se indikátory dop/odp (t a tt) nezobrazí.

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

Viz také

Referenční dokumentace

Členové knihovny prostředí Runtime jazyka Visual Basic

Souhrn manipulace s řetězci (Visual Basic)

Další zdroje

Klíčová slova (Visual Basic)