Je découvre accidentellement une différence de fonctionnement entre l'exécution de MsgBox sous VB6 et VBScript avec ce bout deSous VBScript le caractére ChrW(1787) et affiché correctement, sous VB6 non, l'affichage est transformé en un ? (point d'interrogation).
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Dim Msg Msg = ChrW(1787) MsgBox "ChrW(1787) = " & ChrW(1787) MsgBox "ascW(ChrW(1787)) = " & AscW(ChrW(1787)) If Err <> 0 Then MsgBox "?" End If Msg = ChrW(1787) MsgBox "msg = msg = ChrW(1787) = " & Msg MsgBox "asc(msg) = " & Asc(Msg) MsgBox "ascW(msg) = " & AscW(Msg)
Chez vous, cela ce passe comment ?
Partager