Visual Basic 6 är en händelsestyrd programmering språk för Windows , som ursprungligen bygger på BASIC . Språket innehåller många funktioner och uttalanden för string manipulation . Byta ett tecken i en sträng med en annan är ett viktigt steg i många uppgifter strängmanipulationer , inbegripet kryptografi , desinficerande in och redigera text som användaren skriver det . I Visual Basic 6 , kan du ersätta ett tecken med en annan med hjälp av Mid uttalande . Instruktioner
1
kopiera strängen du vill ändra till en variabel . Detta är nödvändigt eftersom Mid uttalandet arbetar med variabler , men inte med egenskaperna hos klasserna eller kontroller . ( Om strängen du vill ändra är redan i en variabel , kan du hoppa över det här steget . ) Som String
StringToModify = Text1.Text
2 Review
Dim StringToModify
Bestäm vilken karaktär du vill ersätta . Om det tecken du vill ersätta kommer att vara i samma läge varje gång , ange positionen som ett tal . ( Tecknet numreringen börjar vid 1 . ) Annars bestämmer karaktären position och lagra den i en variabel . Detta exempel finner det sista tecknet i strängen :
Dim CharacterPosition As Integer
CharacterPosition = Len ( StringToModify ) Addera 3
Byt ut tecken med Mid . Den Mid uttalande tar tre argument : Strängen som ska modifieras , startpositionen för det avsnitt som ska ersättas , och längden på det avsnitt som ska ersättas . ( . Eftersom du vill ersätta ett enda tecken , kommer längden alltid vara 1 ) Detta exempel ersätter tecknet med ett kapital D :
Mid ( StringToModify , CharacterPosition , 1 ) = " D "
4
Kopiera tillbaka fastigheten , om du kopierat en fastighet i första steget :
Text1.Text = StringToModify
