Bonjour,
Comment-puis faire pour récupérer une valeur d'un champ d'un classe en lui passant le nom de mon champ en paramètre ?
Dans mon code principal j'appel et je construit deux collections de classes puis dans une seule et même fonction, j'aimerais pouvoir appeller n'importe quel élément d'une de mes classes pour faire des contrôles.
Private Sub Form_Load()
Dim colProduit As New Collection
Dim eleProduit As New produit <== une de mes classes
Dim colRayon As New Collection
Dim eleRayon As New rayon <== une de mes classes
...
CheckProduits(eleProduit, colProduit, "prix")
CheckRayons(eleRayon, colRayon,"taille")
...
End Sub
Public Function CheckItems(Element as object, Collection as collection, champ as string)
For Each Element In Collection
debug.print element.item("prix") ==> l'objet ne gère pas cette propriétée ou cette méthode
Next Element
End Function
J'ai essayé element.item(1) => pareil ça marche pas
Par contre, si je fais :
debug.print element.prix ==> là c'est bon mais alors je perd le coté dynamique que je voulais.
Je ne peux pas non plus mettre Public Function CheckItems(Element as Produit,... sinon là aussi je perd le coté dynamique.
Quelqu'un a une idée pour avoir le PRIX de ELEMENT ?
Merci d'avance