Funciones de cadena (Visual Basic)

Artículo
05/10/2023

En la tabla siguiente, se enumeran las funciones que Visual Basic proporciona en la clase Microsoft.VisualBasic.Strings para buscar y manipular cadenas. Se pueden considerar funciones intrínsecas de Visual Basic; es decir, no es necesario llamarlas como miembros explícitos de una clase, como se muestra en los ejemplos. Los métodos adicionales y, en algunos casos, los métodos complementarios, están disponibles en la clase System.String.

Método de .NET Framework	Descripción
Asc, AscW	Devuelve un valor `Integer` que representa el código de carácter correspondiente a un carácter.
Chr, ChrW	Devuelve el carácter asociado al código de carácter especificado.
Filter	Devuelve una matriz basada en cero que contiene un subconjunto de una matriz `String` basada en criterios de filtro especificados.
Format	Devuelve una cadena con el formato que especifiquen las instrucciones contenidas en una expresión `String` de formato.
FormatCurrency	Devuelve una expresión con formato de moneda en la que se utilizará el símbolo de moneda que se haya definido en el panel de control del sistema.
FormatDateTime	Devuelve una expresión de cadena que representa un valor de fecha u hora.
FormatNumber	Devuelve una expresión con formato de número.
FormatPercent	Devuelve una expresión con formato de porcentaje (es decir, multiplicada por 100) con un carácter % final.
InStr	Devuelve un entero que especifica la posición inicial de la primera aparición de una cadena dentro de otra.
InStrRev	Devuelve la posición de la primera aparición de una cadena dentro de otra, comenzando por el extremo derecho de la cadena.
Join	Devuelve una cadena creada a partir de la combinación de varias subcadenas contenidas en una matriz.
LCase	Devuelve una cadena o un carácter convertidos en minúscula.
Left	Devuelve una cadena que contiene un número especificado de caracteres a partir del lado izquierdo de una cadena.
Len	Devuelve un entero que contiene el número de caracteres de una cadena.
LSet	Devuelve una cadena alineada a la izquierda que contiene la cadena especificada ajustada a la longitud indicada.
LTrim	Devuelve una cadena que contiene una copia de una cadena especificada sin espacios iniciales.
Mid	Devuelve una cadena que contiene un número especificado de caracteres de una cadena.
Replace	Devuelve una cadena en la que la subcadena especificada se reemplaza determinado número de veces por otra subcadena.
Right	Devuelve una cadena que contiene un número especificado de caracteres desde el lado derecho de una cadena.
RSet	Devuelve una cadena alineada a la derecha que contiene la cadena especificada y con la longitud especificada.
RTrim	Devuelve una cadena que contiene una copia de una cadena especificada sin espacios finales.
Space	Devuelve una cadena que consta del número especificado de espacios.
Split	Devuelve una matriz unidimensional basada en cero que contiene un número especificado de subcadenas.
StrComp	Devuelve un valor, -1, 0 ó 1, que indica el resultado de una comparación de cadena.
StrConv	Devuelve una cadena convertida según se ha especificado.
StrDup	Devuelve una cadena o un objeto que se compone del carácter especificado repetido el número de veces especificado.
StrReverse	Devuelve una cadena en la que se invierte el orden de los caracteres de la cadena especificada.
Trim	Devuelve una cadena que contiene una copia de una cadena especificada sin espacios iniciales ni finales.
UCase	Devuelve una cadena o un carácter que contiene la cadena especificada convertida en mayúsculas.

Puede usar la instrucción Option Compare para establecer si las cadenas se comparan mediante un criterio de ordenación de texto que no distingue mayúsculas y minúsculas determinado por la configuración regional del sistema (Text) o por las representaciones binarias internas de los caracteres (Binary). El método de comparación de texto predeterminado es Binary.

Ejemplo: UCase

En este ejemplo se utiliza la función UCase para devolver la versión en mayúsculas de una cadena.

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

Ejemplo: LTrim

En este ejemplo se usa la función LTrim para quitar los espacios iniciales y la función RTrim para quitar los espacios finales de una variable de cadena. También se usa la función Trim para quitar ambos tipos de espacios.

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

Ejemplo: Mid

En este ejemplo, se utiliza la función Mid para devolver un número especificado de caracteres de una cadena.

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

Ejemplo: Len

En este ejemplo se utiliza Len para devolver el número de caracteres de una cadena:

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

Ejemplo: InStr

En este ejemplo se usa la función InStr para devolver la posición de la primera aparición de una cadena dentro de otra.

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

Ejemplo: Format

En este ejemplo se muestran los diversos usos de la función Format para dar formato a valores tanto con formatos String como otros definidos por el usuario. Para el separador de fecha (/), hora (:) e indicadores de a.m./p.m. (t y tt), el formato de salida que muestre su sistema dependerá de la configuración regional que use el código. Cuando las horas y fechas se muestren en el entorno de desarrollo, se utilizará el formato de fecha y hora corta de la configuración regional del código.

Nota

Para configuraciones regionales que utilizan un reloj de 24 horas, los indicadores de a.m./p.m. (t y tt) no muestran 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%")