TÉCNICAS DE PROGRAMACIÓN / Visual Basic.
NET
21 - Funciones con cadenas String
VB.NET tiene funciones para realizar operaciones con cadenas de caracteres (string), que nos
pueden ser muy útiles. Con estas funciones podemos obtener el largo de una cadena, reemplazar
caracteres o extraer “subcadenas” entre otras funciones.
Para verlo en práctica haremos un programa en el que podamos ingresar un texto y al confirmar
con un botón nos mostrará el resultado de las funciones que utilizamos.
Funciones con cadenas de caracteres (string)
Len Devuelve el número de caracteres de la cadena.
largoTexto = Len(txtVisor.Text)
UCase Convierte una cadena en mayúsculas.
textoMayusculas = UCase(txtVisor.Text)
LCase Convierte en minúscula la cadena.
textoMinusculas = LCase(txtVisor.Text)
Mid Toma los n caracteres indicados a partir de la posición p. Si no se indica el número
de caracteres, se tomará desde la posición p.
primeraLetraTexto = Mid(txtVisor.Text, 1, 1)
'Muestra primera letra
ultimaLetraTexto = Mid(txtVisor.Text, Len(txtVisor.Text), 1)
'Muestra última letra
TrimStart() Quita los caracteres detallados del principio de una cadena.
lblIzquierda.Text = txtVisor.Text.TrimStart(" ") 'En este caso se
utiliza para quitar cualquier espacio del principio del texto
TrimEnd() Quita caracteres del final de una cadena de caracteres.
lblDerecha.Text = txtVisor.Text.TrimEnd("f") 'En este caso quita
las letra efes que encontró al final del texto
InStr Devuelve la posición (un número entero) de una cadena dentro de otra.
lblBuscaCadena.Text = InStr(txtVisor.Text, "@") 'Busca una cadena
dentro de otra. En este caso busca “@” dentro del texto y devuelve
la posición
TÉCNICAS DE PROGRAMACIÓN / Visual Basic.NET
StrDup Devuelve una cadena con tantos caracteres como se indique. El segundo
parámetro puede ser una cadena o un carácter, si es una cadena solo se usará el
primer carácter.
cuatroArroba = StrDup(4, "@") 'Devuelve cuatro arrobas
Replace Dentro de una cadena busca una cadena y la reemplaza por otra.
reemplazaAPorX = Replace(txtVisor.Text, "a", "x") 'Reemplaza las
"a" por "x"
Asc Convierte un carácter (o el primer carácter de una cadena) en el valor entero que
representa ese carácter.
miAscii = Asc("x") 'Devuelve el código ASCII de la "x"
Chr Convierte un valor entero en un carácter.
asciiaCaracter = Chr(122)
'Devuelve una letra a partir de un código (122 devuelve “z”)
Práctica:
Desarrollar un programa en el que
podamos ingresar un texto y al confirmar
con un botón nos muestre el resultado de
las funciones que utilizamos.
Al final de la imagen se observa la
etiqueta “Borrar:” y a continuación el
texto que viene del TextBox. Con estas
herramientas pueden desarrollar el
código del botón “Borrar” para que
cumpla la función del Backspace.