Der er flere forskellige figurer , der repræsenterer en accent . Graven, tilde og akut accenttegn er repræsenteret ved et specialtegn over bogstav i ordet . Selvom der ikke er mange engelske ord med accenter , der er flere på fransk og spansk. Når du modtager eller sender fransk eller spansk data fra Visual Basic til enten en database eller et andet program skrevet i et andet programmeringssprog , kan det være nødvendigt at fjerne accent før det andet program kan behandle det. Instruktioner
1

Opret en ny standard-EXE Visual Basic -program. Føj evnen til at læse og bearbejde data fra en ekstern fil ved at vælge " Project " og " Referencer". Afkryds feltet ved siden af ​​" Microsoft Scripting Runtime " og klik på "OK " for at gemme . Dette giver programmet adgang til Windows API til filhåndtering
2

Erklær to variabler: . Én som en " FileSystemObject " og den anden som en " TextStream " :

Dim oFSO som New Scripting.FileSystemObject

Dim oMyFile som Scripting.TextStream

Dernæst åbner filen for læsning i TextStream .

Set oMyFile = oFSO.OpenTextFile ( FileName , ForReading )

Også erklære en variabel til at holde hver linje i TextStream som " Dim sLineRead som String ".
3

Process tekstfilen linje for linje i en skriftlig løkke som "Mens Ikke oMyFile.AtEndOfStream . " Indstil " sLineRead " svarende til en tekstlinje fra TextStream : Hej

sLineRead = oMyFile.ReadLine
p Hvis der er nogen accenter er indeholdt i " sLineRead " kan du erstatte dem med en anden værdi ved hjælp af VB " erstatte "-metoden.
4

Identificer accent tegn, der skal fjernes. For eksempel kan tekst, der indeholder " E" udskiftes med "e" forud for visning eller indsættelse af data i en database : Hej

sLineRead = Erstat ( sLineRead , "e" , "e" ) < br >

Denne linje kode erstatter alle forekomster af "E" med "e" i tekstlinje læses ind " sLineRead " uden at ændre nogen af ​​de oprindelige data.