Faire une procedure avec des argumentsRésolu

Question

bonjour

voila g fait une procedure pour imprimer un msflexgrid avec l'aide tres genereuse de ce forum....merci

sur une form g un msflexgrid un dbgrid et un command button, g lie le msflexgrid au data grid et roule ma poule ma function Private sub Imprimer() fonctionne a merveille...

Mais voila maintenant je veux passer le msflexgrid en argument et appeler ma sub de n'importe ou... et l&#224; je coince.... voila ce que g fait et qui ne fonctionne pas...

Public sub Imprimer(Grille as Msflexgrid)

et kan d'un commandButton je fait Imprimer (Grille1)   &#231;a coince ....help merci

mrdep1978 · Accepted Answer

Sur quelle ligne il coince ?

J'ai fait &#231;a, et je n'ai aucun pb

Option Explicit


Private Sub Form_Load()
Call lsub_test(MSFlexGrid1)
End Sub


Private Sub lsub_test(a_Flex As MSFlexGrid)
MsgBox a_Flex.Name
End Sub

cs_steppenwolf · Answer

Je pense qu'il manque un petit truc dans la d&#233;claration de ta proc&#233;dure :

Public sub Imprimer(ByVal Grille as Msflexgrid)

Alex

----------------------------
F&#234;te comme moi, be MIAG

lionelbre · Answer

ca doit repondre a tes attentes :

http://www.vbfrance.com/code.aspx?id=25767


www.be-dot.com

econs · Answer

Tu as deux possibilit&#233;s pour appeler ta proc&#233;dure


Imprimer maGrille

Call Imprimer(maGrille)






Manu
-------------------------------------------
Une question bien pos&#233;e, c'est une chance de r&#233;ponse bien adapt&#233;e.

chicochiri · Answer

Bon la solution c'est bien de l'appeler avec call : call Public sub Imprimer (Byval Grille as MsFlexgrid)........ &#231;a &#231;a marche ( a noter que Byval apparement n'est pas obligatoir) Par contre quand je met tout &#231;a dans un module de declarations generales, l&#224; &#231;a coince.....Du coup pour le moment je suis oblig&#233; de mettre cette fonction dans chaque form ........si vous avez une id&#233;e.... en tout cas merci bien les potes

lionelbre · Answer

ben met le dans une form en public, et c bon
www.be-dot.com

mrdep1978 · Answer

C'est dans un module qu'il faut la mettre. Si tu la mets dans une form, tu dois faire 
Call frmXX.Imprimer(monFlexgrid)

Faire une procedure avec des arguments

7 réponses

Discussions similaires