conversion d'un string en integer

pouvez vous m'aider
j'ai écris :

Code:

---

1 2 3 4 5

dim Variable as string Variable = InputBox ("Numero Conteneur","Saisie",affiche(6)) if len(Variable )>0 then affiche(6) = val(Variable) end if

---

le problème c'est que quand je rentre une variable suppèrieur à 4 chiffres dans ma inputBox je retrouve n'importe quoi dans mon affiche(6)

Balises Code ajoutées par zazaraignée

1) De quel type est ton contrôle affiche ?
2) de quel type peuvent être les nombres que tu saisis dans l'inputbox ? (avec ou sans décimales et si avec décimales, avec quel séparateur ?)

mon affiche(6) est un tableau de type message (string)
dans mon inputBox je peux rentrer jusqu'à 6 chiffres ils ne doivent pas avoir de virgule se sont des chiffres entier.
il n'y a aucun message d'erreur qui s'affiche.

déjà :
s'il est de type string , pourquoi :

Citation:

---

affiche(6) = val(Variable)

---

On se demande.....
et un inputbox ne me parait pas indiqué pour contrôler ergonomiquement une saisie...

Citation:

---

Envoyé par FHILJDS

Code:

---

1 2 3 4 5

dim Variable as string Variable = InputBox ("Numero Conteneur","Saisie",affiche(6)) if len(Variable )>0 then affiche(6) = val(Variable) end if

---

---

tout d'abord comme l'a dit jmf pourquoi convertir en entier pourtant les deux variable sont de meme type (string). Ensuite les valeurs sont fausse a partir de 32 ... (je ne me rappel plus tres bien la limites des entier). Ainsi je croit donc qu'en enlevant le val tout ira bien.

Petite Info passagère :D
Limites d'un entier :
-32768 à 32767 ;) :lol: