Visual Basic 6 - Sostituzione elettere accentate

Volevo chiedere se esiste una funzione per sostituire le lettere accentate in una stringa con l'equivalente lettera senza accento.
Quindi ad esempio tutte le À, Á, Â, Ã, Ä, Å ecc. devono diventare A.

Per ora ho risolto con una sfilza di Replace ma volevo sapere se esisteva qualcosa di più specifico.

Grazie

non c'è una funzione specifica...

però forse un modo c'è... le lettere accentate delle varie A vengono una dopo l'altra... quindi i loro valori decimali saranno continui (per esempio: 196,197,198,199,ecc...) allora puoi usare un ciclo che parta da mettiamo 196 fino a mettiamo 200 e poi usi replace... quindi viene una cosa del tipo:

for X = 196 to 200
text1.text = replace(text1.text, chr(X), "A"
next X

per sapere i valori decimali cerca con google le tabelle/tavole ASCII... oppure puoi usare asc("A-accentata" e ti segni i loro valori decimali...