Paso 1: cadenas
texta = "abcdefg"
poner "simbolos en ambos lados del texto que desea ser contado como una cadena
MID (cadena, Inicio, longitud) selecciona una sección de texto de una cadena
en las cadenas no hay cero arranque de cuerdas en 1
textb = mid (texta, 2, 2)
Esto hace que la variable textb = "bc"
textb = mid (texta, 4, 4)
Esto hace que la variable textb = "defg"
textb = mid (texta, 4, 5)
Esto hace que la variable textb = "defg"
Eso es si el texto está tratando de seleccionar es más entonces el texto disponible termina en el último carácter
dependiendo de tu programa tendrás que colocar las trampas para evitar errores.
Esto es tan una trampa:
textb = mid (texta, 4, 5)
Si len(textb) < 5 entonces ' Len() devuelve la longitud de una cadena el < significa menos entonces
MsgBox "el texto es demasiado corto" ' muestra un cuadro de mensaje con la cadena
salida sub ' esto sale el sub está terminando el código pulg. Si estás en una función y luego le pones salida de función
terminar si
encontrar el lugar de un carácter en una cadena
Utilizamos instr (comienzo, cadena1, cadena2)
texta = "abcdefg"
textb = instr (1, texta, "c") ' Esto encuentra la letra c en cadena texta
textb ahora es igual a 3
NOTA:
InStr devuelve 0 (cero) si no encuentra el carácter
REORGANIZAR:
Esto es molesto
dices que quieres "abcdefg" a ser "defgabc"
texta = "abcdefg"
textb = mid (texta, 4, 4) & mid (texta, 1, 3)
Que no estaba mal pero ahora permite añade en la función instr()
quiere reorganizar una cadena en un carácter de cortina pero no es el mismo cada vez que mancha
texta = "abcdefg"
textb = "gfabdec"
textc = mid (texta, instr (texta, 1, "c"), len(texta) - instr (1, texta, "c") + 1) & mid (texta, 1, instr (texta, 1, "c") - 1)
Tenga en cuenta la parte len(texta) - instr (1, texta, "c") + 1 porque instr cuenta el carácter que está buscando para volver un carácter para el mid() toma el carácter que buscas como el primero la cadena de
textc ahora equivale a "cdefgab"
textd = mid (textb, instr (1, textb, "c"), len(textb) - instr (1, textb, "c") + 1) & mid (textb, 1, instr (1, textb, "c") - 1)
textd ahora equivale a "cgfabde"
permite tratar de encontrar un personaje que no está en la cadena
texta = "abcdefg"
textc = mid (texta, instr (texta, 1, "h"), len(texta) - instr (1, texta, "h") + 1) & mid (texta, 1, instr (texta, 1, "h") - 1)
se produce un error porque la parte de inicio de Mid() no = 0 puesto que cadenas desde 1
así que hay que evitar el error de tiempo de ejecución. Esto es una manera de hacerlo
texta = "abcdefg"
Si instr (1, texta, "h") <> 0 entonces
textc = mid (texta, instr (texta, 1, "h"), len(texta) - instr (1, texta, "h") + 1) & mid (texta, 1, instr (texta, 1, "h") - 1)
Else ' sólo una declaración más por if situación
MsgBox "no puede buscar carácter en cadena" ' muestra un cuadro de mensaje con la cadena
terminar si
Esto resume prácticamente todo lo que necesitas saber acerca de cadenas
