Quitar todos los espacios de una cadena visual basic (vb6) – Replace()
Bienvenidos a VerTutoriales, continuando con Visual Basic 6 (vb6) voy a dejaros un pequeño código para eliminar todos los espacios que queden en una cadena, esto lo utilizo para realizar búsquedas con palabras que puedan llevar referencias o códigos con cualquier caracter y por lo tanto incluir tambien espacios de por medio, en algunos casos es posible que nuestra búsqueda no sea satisfactoria a causa de que tenga algún espacio, ya sea antes, despues o por medio.
Se me dió el caso en un proyecto que estoy llevando actualmente (por eso llevo algunos artículos seguidos de visual basic) en el que dependiendo del archivo que envien puede venir un código u otro («Ref 01» <> «Ref01»), así que despues de darme de cabezazos contra la pared por no comprender por que siendo el mismo código no pasaba por ahí, pude comprobar que en algunos códigos venía el espacio como una broma pesada. Despues de una alegría desmedida como si hubiera encontrado una brecha de oro me puse manos a la obra y la solución era bien sencilla:
Replace(vCodigo, » «, «»)
La función Replace(), cambia la cadena que se le asigne por otra, dentro de una cadena dada, en mi caso vCodigo es la cadena dada, devolviendo en el caso de «Ref 01» el valor «Ref01» de esta manera, al eliminar todos los espacios en ambos casos la cadena será la misma (siempre que el código lo sea claro 🙂
Así que ya teneis un problema menos, y sino… pues podeis compartirlo con nosotros en los comentarios para darle solución entre todos.
¿Tienes alguna duda más? Comentala 🙂