Има няколко ресурса, които може да са ви полезни. Можете да ги намерите тук и тук . Първият е възможен дублиран въпрос с още няколко функции, които могат да ви помогнат да разберете проблема си. Втората е статия, на която попаднах, докато търсех в Google въпроса ви. Оказа се страхотно четиво.
Нещо по-практично беше това:
Public Function RemoveAccentMarks(ByVal s As String) As String
Dim stringBuilder As New StringBuilder
Dim c As Char
For Each c In s
Dim v As Char = Chr(Asc(c) And &H7F)
stringBuilder.Append(v)
Next
Return stringBuilder.ToString
End Function
(Източник - ще трябва да превъртите до дъното, Боб Струнц твърди, че е работило за него!)
Надявам се това да помогне, по-скоро ми хареса този въпрос (гласуване с горе). Беше забавно, информативно и интересно!
-sf