Normaliser alle UTF8-tegn til det mest standardformat

Der er et par ressourcer, som kan være nyttige for dig. Du kan finde dem her , og her . Det første er et muligt duplikatspørgsmål med et par flere funktioner, der kan hjælpe dig med at finde ud af dit problem. Den anden er en artikel, som jeg faldt over, mens jeg googlede dit spørgsmål. Det viste sig at være en fremragende læsning.

Noget mere praktisk var dette:

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

(Kilde - du bliver nødt til at rulle til bunden, det var Bob Strunz, der påstod, at det virkede for ham!)

Håber det hjælper, jeg nød snarere dette spørgsmål (stemme op). Det var sjovt, informativt og interessant!

-sf