Funções da cadeia de caracteres (Visual Basic)

Artigo
05/10/2023

A tabela a seguir lista as funções que o Visual Basic fornece na classe Microsoft.VisualBasic.Strings para pesquisar e manipular cadeias de caracteres. Elas podem ser consideradas funções intrínsecas do Visual Basic; ou seja, você não precisa chamá-las como membros explícitos de uma classe, como mostram os exemplos abaixo. Métodos adicionais e, em alguns casos, métodos complementares, estão disponíveis na classe System.String.

Método .NET Framework	Descrição
Asc, AscW	Retorna um valor de `Integer` que representa o código de caractere correspondente a um caractere.
Chr, ChrW	Retorna o caractere associado ao código de caractere especificado.
Filter	Retorna uma matriz baseada em zero contendo um subconjunto de uma matriz `String` com base em critérios de filtro especificados.
Format	Retorna uma cadeia de caracteres formatada de acordo com as instruções contidas em uma expressão `String` de formato.
FormatCurrency	Retorna uma expressão formatada como um valor de moeda usando o símbolo da moeda definido no painel de controle do sistema.
FormatDateTime	Retorna uma expressão de cadeia de caracteres que representa um valor de data/hora.
FormatNumber	Retorna uma expressão formatada como um número.
FormatPercent	Retorna uma expressão formatada como um percentual (isto é, multiplicada por 100) com um caractere % à direita.
InStr	Retorna um inteiro que especifica a posição inicial da primeira ocorrência de uma cadeia de caracteres dentro de outra.
InStrRev	Retorna a posição da primeira ocorrência de uma cadeia de caracteres em outra, começando do lado direito da cadeia de caracteres.
Join	Retorna uma cadeia de caracteres criada unindo um número de subcadeias contidas em uma matriz.
LCase	Retorna uma cadeia de caracteres ou um caractere convertido em minúsculas.
Left	Retorna uma cadeia de caracteres que contém um número especificado de caracteres do lado esquerdo de uma cadeia de caracteres.
Len	Retorna um inteiro que contém o número de caracteres em uma cadeia de caracteres.
LSet	Retorna uma cadeia de caracteres alinhada à esquerda que contém a cadeia especificada ajustada no tamanho especificado.
LTrim	Retorna uma cadeia de caracteres contendo uma cópia de uma cadeia de caracteres especificada sem espaços à esquerda.
Mid	Retorna uma cadeia de caracteres contendo um número específico de caracteres de uma cadeia.
Replace	Retorna uma cadeia de caracteres na qual uma subcadeia de caracteres especificada foi substituída por outra subcadeia de caracteres um número especificado de vezes.
Right	Retorna uma cadeia de caracteres que contém um número especificado de caracteres do lado direito de uma cadeia de caracteres.
RSet	Retorna uma cadeia de caracteres alinhada à direita que contém a cadeia especificada ajustada no tamanho especificado.
RTrim	Retorna uma cadeia de caracteres contendo uma cópia de uma cadeia de caracteres especificada sem espaços à direita.
Space	Retorna uma cadeia de caracteres que consiste no número especificado de espaços.
Split	Retorna uma matriz unidimensional baseada em zero que contém um número especificado de subcadeias de caracteres.
StrComp	Retorna -1, 0 ou 1, com base no resultado de uma comparação de cadeia de caracteres.
StrConv	Retorna uma cadeia de caracteres convertida, conforme especificado.
StrDup	Retorna uma cadeia de caracteres ou um objeto que consiste no caractere especificado repetido no número de vezes especificado.
StrReverse	Retorna uma cadeia de caracteres na qual a ordem dos caracteres de uma cadeia de caracteres especificada é invertida.
Trim	Retorna uma cadeia de caracteres contendo uma cópia de uma cadeia de caracteres especificada sem espaços à direita ou à esquerda.
UCase	Retorna uma cadeia de caracteres ou um caractere que contém a cadeia de caracteres especificada, convertida em maiúsculas.

Você pode usar a instrução Option Compare para definir se as cadeias de caracteres são comparadas usando uma ordem de classificação de texto que não diferencia maiúsculas de minúsculas determinada pela localidade do sistema (Text) ou pelas representações binárias internas dos caracteres (Binary). O método de comparação de texto padrão é Binary.

Exemplo: UCase

Este exemplo usa a função UCase para retornar uma versão de uma cadeia de caracteres em letras minúsculas.

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

Exemplo: LTrim

Este exemplo usa a função LTrim para retirar espaços à esquerda e a função RTrim para retirar espaços à direita de um variável de cadeia de caracteres. Usa a função de Trim para retirar ambos os tipos de espaços.

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

Exemplo: Mid

Este exemplo usa a função Mid para retornar um número especificado de caracteres de uma cadeia de caracteres.

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

Exemplo: Len

Este exemplo usa Len para retornar o número especificado de caracteres em uma cadeia de caracteres.

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

Exemplo: InStr

Este exemplo usa a função InStr para retornar a posição da primeira ocorrência de uma cadeia de caracteres dentro da outra.

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

Exemplo: Format

Este exemplo mostra vários usos da função Format para formatar valores usando os formatos String e os formatos definidos pelo usuário. Para o separador de data (/), separador de hora (:) e indicadores AM/PM (t e tt), a saída formatada real exibida pelo seu sistema depende das configurações de localidade que o código está usando. Quando horas e datas são exibidas no ambiente de desenvolvimento, o formato abreviado de tempo e o formato abreviado de data do local do código são usados.

Observação

Para localidades que usam um relógio de 24 horas, os indicadores AM/PM (t e tt) não exibem nada.

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