Funciones de cadena (Visual Basic)
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%")
