Det finnes flere forskjellige tegn som representerer en aksent . Graven tilde og akutt aksent merker er representert med en spesiell karakter over bokstaven i ordet. Selv om det ikke er mange engelske ord med aksenter , det er flere i fransk og spansk. Når du mottar eller sender fransk eller spansk data fra Visual Basic til enten en database eller et annet program skrevet i et annet programmeringsspråk, kan det være nødvendig å fjerne aksent før andre program kan behandle det. Instruksjoner
en

Opprett en ny Standard EXE Visual Basic program . Legg evnen til å lese og behandle data fra en ekstern fil ved å velge " Project" og "Referanser . " Kryss av i boksen ved siden av " Microsoft Scripting Runtime " og klikk " OK " for å lagre . Dette gir programmet tilgang til Windows API for filhåndtering
2

Erklærer to variabler: . En som en " FileSystemObject " og den andre som en " TextStream " :

Dim oFSO som New Scripting.FileSystemObject

Dim oMyFile som Scripting.TextStream

Deretter åpner filen for lesing i TextStream .

Set oMyFile = oFSO.OpenTextFile ( filnavn, ForReading )

også deklarere en variabel til å holde hver linje av TextStream som " Dim sLineRead som String . "
3

Process tekstfilen linje for linje i en sløyfe skrevet som "Mens Ikke oMyFile.AtEndOfStream . " Sett " sLineRead " lik en tekstlinje fra TextStream : en

sLineRead = oMyFile.ReadLine
p Hvis det er noen aksenter som inngår i " sLineRead " du kan erstatte dem med en annen verdi ved hjelp av VB "erstatte " metoden.
4

Identifiser aksent karakter skal fjernes . For eksempel kan tekst som inneholder " e" erstattes med "e" før visning eller sette inn data i en database : en

sLineRead = Erstatt ( sLineRead , "e" , "e" )
p Dette kodelinje erstatter alle forekomster av "E" med " e " i tekstlinje leses inn " sLineRead " uten å endre noen av de opprinnelige dataene .