Ako nahradiť znak v reťazci vo VB6

Visual Basic 6 je event - driven programovací jazyk pre Windows , pôvodne založený na BASIC . Jazyk obsahuje veľa funkcií a príkazy pre manipuláciu s reťazcami . Výmena jedného znaku v reťazci s iným , je dôležitým krokom v mnohých manipuláciu s reťazcami úloh , vrátane kryptografie , dezinfekčné vstup a editácia textu ako užívateľ zadá to . V aplikácii Visual Basic 6 , môžete nahradiť jeden znak s inou pomocou príkazu Mid . Pokyny
1

Skopírujte reťazec , ktorý chcete upraviť do premennej . To je nutné , pretože príkaz Mid pracuje s premennými , ale nie s vlastnosťami tried alebo ovládacích prvkov . ( Ak reťazec , ktorý chcete upraviť už v premennej , môžete tento krok preskočiť . )

Dim StringToModify ako String

StringToModify = Text1.Text
2

Určite, ktorý znak , ktorý chcete nahradiť . Ak znak , ktorý chcete nahradiť bude na rovnakom mieste zakaždým , určte pozíciu ako číslo . ( Číslovanie postava začína na 1 ) . Inak určiť pozíciu postavy a uložiť ho do premennej . Tento príklad vyhľadá posledný znak v reťazci :

Dim CharacterPosition ako Integer

CharacterPosition = Ľan ( StringToModify )
3

Nahraďte znak pomocou Mid . Vyhlásenie Mid trvá tri argumenty : reťazec má byť zmenený , počiatočné pozície oddielu, ktoré sa majú nahradiť , a dĺžka úseku , ktorý má byť nahradený . ( . Vzhľadom k tomu , že chcete nahradiť jeden znak , dĺžka bude vždy 1 ) ​​Tento príklad nahradí znak s veľkým D :

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

4

skopírujte späť majetok , ak ste skopírovali nehnuteľnosť v prvom kroku :

Text1.Text = StringToModify

• Predchádzajúca strana: Ako otvoriť program Internet Explorer z Visual Basic 
• Ďalšia strana: Ako vypočítať dátum a čas a rozdiel v hodinách & minútach vo VBA