Modulariser les objets d'une form [Résolu]

fatmaboule 9 Messages postés jeudi 25 novembre 2004Date d'inscription 13 mars 2018 Dernière intervention - 16 juin 2006 à 09:26 - Dernière réponse : fatmaboule 9 Messages postés jeudi 25 novembre 2004Date d'inscription 13 mars 2018 Dernière intervention
- 18 juin 2006 à 18:22
Hello,

j'ai une petite question:

j'ai diverses forms utilisant toutes les memes combo et listbox.

ces combo et listbox sont remplies dynamiquement selon les actions de l'utilisateur.

je souhaiterait faire le remplissage des combo et listbox a partir du code situé dans un module et non dans la form elle meme, afin d'eviter de dupliquer le meme code de remplissage dans les differentes forms

mon idée serait de faire passer la declaration de l'objet dans le module mais ca marche pas comme je l'imagine:

dans la form:

Private Sub xxx
Dim objetcombo as ??? 
Set objetcombo = combobox1
Call remplissagecombo(objetcombo)

dans le module

Public Sub remplissagecombo(objetcombo)
objetcombo.additem ("lolo1")
....

voila voila

ca doit forcement marcher ca !!!

si qq pouvait me donner un coup de pouce ce serait cool !
Afficher la suite 

Votre réponse

3 réponses

Meilleure réponse
cs_Jack 14010 Messages postés samedi 29 décembre 2001Date d'inscription 28 août 2015 Dernière intervention - 16 juin 2006 à 18:30
3
Merci
Elle est Public, j'avais mal vu (c'est l'âge).

Merci cs_Jack 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 96 internautes ce mois-ci

Commenter la réponse de cs_Jack
cs_Jack 14010 Messages postés samedi 29 décembre 2001Date d'inscription 28 août 2015 Dernière intervention - 16 juin 2006 à 18:29
0
Merci
Salut
Si, c'est possible :
-1- Déclare ta Sub dans le module, en type Public sinon, tu ne pourras pas y accéder depuis les formes
-2- C'est dans les paramètres de ta Sub qu'il faut mettre le composant :
Public Sub maSub (monControle As ComboBox)
   monControle.AddItem "Coucou" ' (pas de parenthèses)
End Sub
Et pour l'appeler :
Call maSub (cboMonComboQueJeViensDeCréer)
ou, sans parenthèses si pas de Call
maSub cboMonComboQueJeViensDeCréer

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Champion du monde de boule de cristal - 2005
Le savoir est la seule matière qui s'accro
Commenter la réponse de cs_Jack
fatmaboule 9 Messages postés jeudi 25 novembre 2004Date d'inscription 13 mars 2018 Dernière intervention - 18 juin 2006 à 18:22
0
Merci
merci, merci !

c'est exactement ce que je cherchais ! 
Commenter la réponse de fatmaboule

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.