Discussion :

[Nauja]

Bonjours, je cherche s'il y a un moyen de récupérer toutes les variables utilisées par un objet présent dans le form et d'indiquer leur nom et leur valeur dans une liste. Le but est un peu le même que lorsqu'un programme fait une liste de tous les processus existants, on ne connaît pas forcément leur nom ni leur présence. Ici il faudrait pouvoir récupérer toutes les variables de l'objet sans savoir lesquelles existent.

Si quelqu'un à une solution.

[ProgElecT]

Bienvenue sur DVP.
Manque de précision, un objet a des propriétés, méthodes et événements, F2, dans l'éditeur VB permet de les visualiser(lister) et donne une petite informations pour chacun, si tu as MSDN d'installer F1 sur un mot apporte une information plus importante (avec souvent un exemple d'utilisation).

Motif de l'edit:
MSDN tu peux le charger ICI

[Nauja]

Ce que je voulais dire c'est que je veux que dans mon programme il y ai une listbox qui quand on cliquerait sur un bouton pourrait afficher toutes les variables utilisées par un objet contenu dans le programme.

Pour être plus précis, la fenêtre principale du programme est appelée "Form1". Dans cette fenêtre il y a un composant IShockwaveFlash qui charge une animation flash.
Il faudrait que le Form1 puisse lister toutes les variables qu'utilise le composant IShockwaveFlash et les affiche dans une listbox qui serait située à côté.

J'ai déjà fait un texte éditable où l'utilisateur peut rentrer un nom de variable et le programme, grâce à un flash1.GetVariable(...) renvoi la valeur, ce qui me permet de mettre dans la liste "nom_variable -> valeur". Seulement l'utilisateur ne trouvera pas toujours quelles variables sont utilisées par l'animation flash. Donc je voudrais que le programme les liste toutes.

Exemple: je sais qu'en faisant le code suivant:
For Each Var As Object In Form1
List1.AddItem " Type: " & TypeName(Var)
Next

on obtient la liste et le nom de tous les objets présents dans le Form1 (les menus, les boutons etc)

Y aurait-il le même genre de code pour les variables:
For Each variable In objet_flash
List1.AddItem " Variable: " + str(objet_flash.GetVariable(variable))
Next

?