March 27
Ci sono diversi personaggi che rappresentano un accento. I segni di accento grave, tilde e acute sono rappresentati da un carattere speciale sopra la lettera nella parola. Anche se non ci sono molte parole in inglese con accenti, ci sono diversi in francese e spagnolo. Durante la ricezione o l'invio di dati francesi o spagnoli da Visual Basic, o un database o un'altra applicazione scritta in altro linguaggio di programmazione, potrebbe essere necessario rimuovere l'accento prima che l'altra applicazione in grado di elaborarlo.
1 Creare un nuovo programma EXE standard di Visual Basic. Aggiungere la capacità di leggere ed elaborare i dati da un file esterno selezionando "Progetto" e "Riferimenti". Seleziona la casella accanto a "Microsoft Scripting Runtime" e fare clic su "OK" per salvare. Questo dà l'accesso al programma alle API di Windows per la gestione dei file.
2 Dichiarare due variabili: uno come "FileSystemObject" e l'altro come "TextStream":
Dim oFSO come nuovo Scripting.FileSystemObject
Dim oMyFile come Scripting.TextStream
Quindi, aprire il file per la lettura nella TextStream.
Set oMyFile = oFSO.OpenTextFile (FileName, ForReading)
dichiarare anche una variabile per contenere ogni riga del TextStream come "Dim sLineRead as String".
3 Elaborare la linea di file di testo per riga all'interno di un ciclo scritto come "Anche se non oMyFile.AtEndOfStream." Impostare "sLineRead" pari ad una riga di testo dal TextStream:
sLineRead = oMyFile.ReadLine
Se ci sono accenti contenuti nel "sLineRead" è possibile sostituirli con un altro valore utilizzando il metodo "sostituire" di VB.
4 Identificare il carattere accento da rimuovere. Ad esempio, il testo contenente "E" può essere sostituito con "e" prima di visualizzare o inserire i dati in un database:
sLineRead = Replace (sLineRead, "E", "E")
Questa riga di codice sostituisce tutte le istanze di "E" con "e" all'interno della linea di testo letto in "sLineRead" senza modificare i dati originali.