Visual Basic 6 es un lenguaje de programación orientado a eventos para Windows , basado originalmente en BASIC. El lenguaje incluye muchas funciones e instrucciones para la manipulación de cadenas . Sustitución de un carácter en una cadena con otra es un paso importante en muchas de las tareas de manipulación de cadenas , incluyendo la criptografía , la entrada de desinfección y de edición de texto que el usuario escribe él . En Visual Basic 6 , se puede reemplazar un carácter con otro utilizando la instrucción Mid . Instrucciones
1
Copia la cadena que desea modificar en una variable . Esto es necesario debido a que la instrucción Mid funciona con variables , pero no con las propiedades de las clases o controles . ( Si la cadena que desea modificar ya está en una variable , puede saltarse este paso. )
StringToModify dévil como secuencia
StringToModify = Text1.Text
2 < p> Determinar el carácter que desea reemplazar. Si el carácter que desea reemplazar estará en la misma posición cada vez , especifique la posición de número. ( El personaje de numeración comienza en 1 . ) En caso contrario , determinar la posición del personaje y lo almacena en una variable. Este ejemplo busca el último carácter de la cadena :
CharacterPosition Dim como Integer
CharacterPosition = Len ( StringToModify )
3
Reemplace el carácter utilizando medio . La instrucción Mid toma tres argumentos: la cadena a ser modificado, la posición de inicio de la sección que ser reemplazado, y la longitud de la sección que ser reemplazado. ( . Desde desea reemplazar un solo carácter, la longitud será siempre 1 ) En este ejemplo se reemplaza el carácter con una D mayúscula :
Medio
( StringToModify , CharacterPosition , 1 ) = " D"
4
copia de la propiedad , si ha copiado una propiedad en el primer paso :
Text1.Text = StringToModify