Ci sono diversi personaggi che rappresentano un accento. I segni di grave, tilde e accento acuto sono rappresentati da un carattere speciale oltre la lettera della parola. Anche se non ci sono molte parole inglesi con accenti, ci sono parecchi francese e spagnolo. Quando si riceve o invio dati francesi o spagnoli da Visual Basic a un database o un'altra applicazione scritta in un altro linguaggio di programmazione, potrebbe essere necessario rimuovere l'accento prima di un'altra applicazione possibile elaborarlo.

Istruzioni

1

Creare un nuovo programma di Visual Basic EXE Standard. Aggiungere la possibilità di leggere ed elaborare i dati da un file esterno selezionando "Project" e "Riferimenti". Seleziona la casella accanto a "Microsoft Scripting Runtime" e fare clic su "OK" per salvare. Questo dà l'accesso all'API di Windows per la gestione file.

2

Dichiarare due variabili: uno come un "oggetto FileSystemObject" e l'altro come un "TextStream":

Dim vulcanico come nuovo scripting. FileSystemObject

Dim oMyFile come Scripting.TextStream

Successivamente, aprire il file per la lettura nell'oggetto TextStream.

Impostare oMyFile = oFSO.OpenTextFile (FileName, ForReading)

Inoltre dichiarare una variabile per contenere ogni linea dell'oggetto TextStream come "Dim sLineRead as String."

3

Elaborare il file di testo riga per riga all'interno di un ciclo scritto come "Mentre non oMyFile.AtEndOfStream." Impostare uguale a una riga di testo dall'oggetto TextStream "sLineRead":

sLineRead = oMyFile.ReadLine

Se ci sono eventuali accenti contenuti in "sLineRead" si può sostituire con un altro valore utilizzando VB "sostituire" metodo.

4

Identificare il carattere di accento per essere rimosso. Ad esempio, testo contenente "è" può essere sostituito con "e" prima della visualizzazione o inserimento di dati in un database:

sLineRead = Replace (sLineRead, "è", "e")

Questa riga di codice sostituisce tutte le istanze di "è" con "e" all'interno della linea di testo letto in "sLineRead" senza modificare i dati originali.