variable change de valeur en changeant de sub

Bonjour,
pas facile de résumé le problème dans l'intitulé !
Le plus simple est de montrer :

Code:

---

1 2 3 4 5 6 7 8 9

Public Sub EssaiProcédure_Click() VersAutreSub MsgBox " la valeur de 'Retour' est : " & retour, vbInformation End Sub   Public Sub VersAutreSub() Static retour retour = 5 End Sub

---

Hélas ! dans la boite de message, 'retour' à la valeur : " " ! oui .... rien et quelque soit ce que j'ai essayé 'retour' n'est jamais à 5 !!!
Pour moi c'est un grand mystère !.... et pour vous ???? Non j'espère !!
Grand MERCI de m'aider !! je suis totalement bloqué par ce problème !

Tu peux déclaré ta variable de cette manière :

Code:

---

1 2 3 4 5 6 7 8 9 10

Private retour as Integer   Public Sub EssaiProcédure_Click() VersAutreSub MsgBox " la valeur de 'Retour' est : " & retour, vbInformation End Sub   Public Sub VersAutreSub() retour = 5 End Sub

---