OVH Cloud OVH Cloud

Procédure

2 réponses
Avatar
didier
Bonjour
J'ai r=E9alis=E9 une proc=E9dure du type
Private sub commande1_click
Dim var as integer, cas as integer
Var =3D me.ctrl
cas =3D Me.ctrl1
Select case Cas
.....
End case
end sub
Mais voil=E0 je doit rappeller plusieurs fois cette=20
proc=E9dure sur la mise =E0 jour d'un champs.
Comment pui-je faire sans avoir =E0 la dupliquer
Merci

2 réponses

Avatar
Michel Gesnot
Bonsoir,

Vous transformez votre procédure en fonction (publique)
MaFonctionClick et vous l'intégrez à un module.

Ensuite, vous appelez cette fonction lorsque nécessaire en
l'affectant à la propriété de l'événement, soit
Sur Clic ..... = MaFonctionClick ()
avec ou sans paramètres

Bon travail
M. Gesnot

-----Message d'origine-----
Bonjour
J'ai réalisé une procédure du type
Private sub commande1_click
Dim var as integer, cas as integer
Var = me.ctrl
cas = Me.ctrl1
Select case Cas
......
End case
end sub
Mais voilà je doit rappeller plusieurs fois cette
procédure sur la mise à jour d'un champs.
Comment pui-je faire sans avoir à la dupliquer
Merci
.



Avatar
didier
Bonjour

J'ai bein créer ma fonction
Function delaipaie()
....
End function
et dans mon formulaire j'appelle ma fonction par
Me.crtlÞlaipaie()
Cela marche trés bien
Comment je doit faire pour l'intégrer à un module pour
pouvoir l'appeller d'un autre formulaire
-----Message d'origine-----
Bonsoir,

Vous transformez votre procédure en fonction (publique)
MaFonctionClick et vous l'intégrez à un module.

Ensuite, vous appelez cette fonction lorsque nécessaire
en

l'affectant à la propriété de l'événement, soit
Sur Clic ..... = MaFonctionClick ()
avec ou sans paramètres

Bon travail
M. Gesnot

-----Message d'origine-----
Bonjour
J'ai réalisé une procédure du type
Private sub commande1_click
Dim var as integer, cas as integer
Var = me.ctrl
cas = Me.ctrl1
Select case Cas
......
End case
end sub
Mais voilà je doit rappeller plusieurs fois cette
procédure sur la mise à jour d'un champs.
Comment pui-je faire sans avoir à la dupliquer
Merci
.

.