Comment enregistrer une valeur dans un module et la lire?Résolu

Question

Bonjour &#224; tous...

J'ai un petit probl&#232;me, dans mon programme que je suis en train de voir
(un PTI de BTS IG 1ere ann&#233;e) je n'arrive pas &#224; enregistrer une valeur
dedans... je m'explique:

Je fais ceci:



|dans ma page "form1"|

------------------------------------------

Public Sub boutton_Click()

dim s as integer

s = 5

call module.valdes

End Sub

-------------------------------------------



|et dans mon module ("module")|

-------------------------------------------

Function valdes()



debug.print (s)



End Function

--------------------------------------------

Donc debug.print me sort rien, et si je lui d&#233;clare s, il me sort 0... comment faire?

Merci de vos r&#233;ponses...

Utilisateur anonyme · Accepted Answer

Salut,

Il faut d&#233;clarer 's' en public dans ton module, sinon &#233;vidament ca passe pas.
Pour plus faire d'errreur met Option Explicit au d&#233;but de chacun des fichiers

 |dans ta page "form1"|
 ------------------------------------------
 Public Sub boutton_Click()
s = 5
 call module.valdes
 End Sub
 -------------------------------------------

 |et dans ton module ("module")|
 -------------------------------------------
Public s as integer
 Function valdes()

 debug.print (s)

 End Function
   
Kenji
<hr size="2" width="100%">
Merci de cliquer sur "R&#233;ponse accept&#233;e" si une r&#233;ponse vous convient.

MonsDeluC · Answer

Merci bien! &#231;a marche!

Comment enregistrer une valeur dans un module et la lire?

2 réponses

Discussions similaires