Discussion :

[medkarim]

J'ai le code suivant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
dim a as long
a=&h8000
msgbox cstr(a)

resultats des course

-32768 au lieu de 32768

on dirait qu'il convertit la variable <a> en integer avant d'appler Cstr

par contre

avec
a=32768
ça marche normalement

[SfJ5Rpw8]

Tiens essai :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub Command1_Click()
Dim a As Long
a = &H8000
MsgBox CStr(a)
a = &H8000&
MsgBox CStr(a)
End Sub

[medkarim]

Merci pour la réponse
Chrono 5 minutes