Visual Basic 6 è un linguaggio di programmazione event-driven per Windows , originariamente basato su BASIC . Il linguaggio comprende molte funzioni e le istruzioni per la manipolazione di stringhe . Sostituzione di un carattere in una stringa con un altro è un passo importante in molte funzioni di manipolazione di stringhe , tra cui la crittografia , ingresso sanificazione e la modifica del testo , come l'utente digita esso. In Visual Basic 6 , è possibile sostituire un carattere con un altro utilizzando l'istruzione Mid . Istruzioni
1

copiare la stringa che si desidera modificare in una variabile . Questo è necessario perché l'istruzione Mid lavora con le variabili , ma non con le proprietà di classi o controlli . ( Se la stringa che si desidera modificare è già in una variabile, è possibile saltare questo passaggio . ) Per

Dim StringToModify come String

StringToModify = Text1.Text
2 < p > Determinare il carattere che si desidera sostituire . Se il carattere che si desidera sostituire sarà nella stessa posizione ogni volta , specificare la posizione di un numero . ( Il carattere di numerazione inizia da 1 . ) In caso contrario , determinare la posizione del carattere e memorizzarlo in una variabile . Questo esempio consente di individuare l'ultimo carattere della stringa :

Dim CharacterPosition as Integer

CharacterPosition = Len ( StringToModify )
3

Sostituire il carattere utilizzando Mid . L' istruzione Mid prende tre argomenti: la stringa da modificare , la posizione di inizio della sezione da sostituire , e la lunghezza del tratto da sostituire . ( . Dal momento che si vuole sostituire un singolo carattere , la lunghezza sarà sempre 1) Questo esempio sostituisce il personaggio con la D maiuscola :

Mid ( StringToModify , CharacterPosition , 1 ) = " D "

4

Copia indietro la proprietà , se è stato copiato un immobile nel primo passaggio :

Text1.Text = StringToModify