Conversion du code Ascii 146 (Apostrophe)

Résolu
Cpapy - 15 août 2017 à 19:13
 Cpapy - 16 août 2017 à 10:43
Bonjour,

Je récupère du texte sur Internet que j'utilise dans un programme VB6.
L'analyse par mon programme de ce texte qui contient des apostrophes Asc(146) lui pose problème.

J'ai utilisé l'instruction suivante pour remplacer ce "faux" apostrophe. Malheureusement, cette instruction ne solutionne pas mon problème

Text1.text = replace(text1.text,asc(145),asc(39))  ou
Text1.text = replace(text1.text,asc(145),"'")

Par avance Merci pour votre aide

2 réponses

NHenry
Messages postés
14926
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
16 mai 2022
162
Modifié le 15 août 2017 à 19:47
Regardes l'aide et les différences entre ASC et CHR ...
Et tu as mis 145, pas 146 ...

J'interviens principalement en VB6 et VB.NET, avec un peu de C#, mais la modération m'amène souvent sur d'autre langages.
En VB.NET pensez à activer "Option Explicit" et "Option Strict"
0
Bonjour,

Finalement c'était très simple !

Text1.text = Replace(Text1.text, Chr(146), "'") 
0