Código VB para Eliminar acentos de un texto

By | 09/02/2016
Public Function Eliminar_Acentos(ByVal accentedStr As String) As String
      Dim tempBytes As Byte()
      tempBytes = System.Text.Encoding.GetEncoding("ISO-8859-8").GetBytes(accentedStr)
      Return System.Text.Encoding.UTF8.GetString(tempBytes)
   End Function