Ci sono diversi personaggi che rappresentano un accento. La tomba, segni di accento tilde e acuta sono rappresentati da un carattere speciale sopra la lettera nella parola . Anche se non ci sono molte parole inglesi con accenti , ci sono diversi in francese e spagnolo . Durante la ricezione o l'invio di dati francesi o spagnoli da Visual Basic a un database o da un'altra applicazione scritta in un altro linguaggio di programmazione , potrebbe essere necessario rimuovere l' accento prima che l' altra applicazione in grado di elaborarlo. Istruzioni
1
Creare un nuovo EXE programma Visual Basic standard . 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 per l'API di Windows per la gestione dei file
2
dichiarare due variabili: . Uno come " FileSystemObject " e l'altro come un " TextStream " :
Dim oFSO come New Scripting.FileSystemObject
Dim oMyFile come Scripting.TextStream
Quindi, aprire il file in lettura nella TextStream .
oMyFile = oFSO.OpenTextFile ( FileName , ForReading ) per
dichiarare anche una variabile per contenere ogni riga del TextStream come " Dim sLineRead come String . "
3
processo il file riga per riga di testo all'interno di un ciclo scritto come "Mentre Non oMyFile.AtEndOfStream . " Impostare " sLineRead " pari ad una linea di testo dal TextStream :
sLineRead = oMyFile.ReadLine
Se ci sono accenti contenuti nel " sLineRead " è possibile sostituirli con un altro valore utilizzando VB di " sostituire" il metodo .
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") < br >
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.
