Au secours de toute ma vie je n'ai jamais vu ça

voila j'ai un problème.
cela fait maintenant assez longtemps que je programme en VB mais là je bloque

voici mon code ; il est tout simple :

Private Sub Command1_Click()
Dim CC As Long
CC = 11600 + 19200 + 4000
Print CC
End Sub

et là quand j'execute mon programme j'ai
Erreur d'exucution 6 : dépassement de capacité

et le débogage me renvoie ici : CC = 11600 + 19200 + 4000

alors là...
je ne comprend pas
j'ai pourtant déclaré ma variable en LONG
la fourchette devrait etre comprise entre -2 147 483 648 à 2 147 483 647

à ce que j'ai pu comprendre, il me limite CC à une variable Integer (fourchette -32 768 à 32 767), donc quand je dépasse ça me met cette erreur (ici CC = 34800)

mais pourquoi ???? je l'ai déclarée en LONG !
rohlala dès que j'ai un gros projet les ennuis arrivent

pouvez vous vérifier sur votre bécane pour voir si c'est la mienne qui fait des siennes ?

merci beaucoup à tous
plhea

waou waou waou jamais vu ça !
effectivement ça marche et je suis content que ça fait ça pour tout le monde
mais je ne comprends toujours pas la raison

y aurait il un BUG dans visual basic 6 ???
ou est ce que c'est absolument normal et je suis plus qu'ignorant

si quelqu'un y voit une explication logique je suis ouvert et je vous remercie d'avance
merci à tous

plhea

EDIT (desolé je sais pas comment éditer)

MERCI beaucoup DarkSidious (désolé j'ai posté sans avoir lu ton message)
ok je comprends mieux j'ai fait quelques essais et tu as raison

merci pour vos aides à tous

plhea

Salut,

Bah c'est vrai que c'est bizarre, en même temps, si tu entres toi même 3 chiffres comme ca à la suite par programmation tu dois être capable de faire la somme par toi même !! lol
Et comme ca cela fonctionne (2 manières) :

Méthode 1
Private Sub Command1_Click()
Dim CC As Long
   CC = 11600
   CC = CC + 19000
   CC = CC + 4000
   Print CC
End Sub

Méthode 2
Private Sub Command1_Click()
Dim CC As Long
Dim value1 As Long
Dim value2 As Long
Dim value3 As Long

   value1 = 11600
   value2 = 19200
   value3 = 4000

   CC = value1 + value2 + value3
   Print CC
End Sub

Je sais c'est con comme exemple mais ca me semble plus logique avec des variables. Mais je te l'accorde, je sais pas pourquoi VB ne le prends pas en compte ....  Peut être un beug de VB mais perso je ne vois pas l'interêt de ce genre de structure en programmation ! Mais c'est rai que c'est une question intéressante.

Phil
Bye

Dim CC as long

Daetips

le code exact était

AugmenterPoints ((11600) + (19200) + (4000))

en fait c'était juste pour me simplifier la vie dans ma relecture
en effet, le 11600, le 19200 et le 4000 sont 3 choses différentes et j'ai préféré les séparer en pensant - à tort - que ça n'allait rien changer

plhea

OK Darksidiou mais si tu déclares le résultat de ton opération en Long c'est ilogique de devoir convertir les nombre en Long puisque le résultat de l'addition de tous les nombres est plus petite que la limite supérieure qu'accepte un Long (2 147 483 647). Les entiers ayant une limite inférieure (32 767).
Je dois peut être être con mais je saisis mal ... lol.

Je pense que c'est pour une raison d'optimisation : additionner des entiers sur 2 octets est forcément plus rapide que des entiers sur 4 octets ! (et c'est d'autant plus vrai pour les opérations lourdes telles que multiplications ou modulo).

Du coup, VB prend le type de données le plus petit possible pour faire l'addition, et si ca dépasse, tant pis pour toi.

Dans ton premier exemple, tu additionne un long avec un integer, donc VB renvoie un long, par contre, un integer avec un integer renvoie un integer, même si la variable stockant le résultat est un long !

Sinon, je tiens à remercier daetips qui a tout compris au schmilblick :) lol