Bonjour.
Plutôt que de me lancer dans une solution qui peut se révéler inadaptée, je prends les devants en vous exposant mon problème.

Je crée la classe ClasseDeTrucs dans un module de classe, constituée de diverses variables avec les méthodes et les propriétés correspondantes.
J’y ajoute la méthode Bouge().
Dans la fenêtre Form1 je crée une procédure Creation() qui crée un Truc1
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Private Sub Creation()
Dim Truc1 as New ClasseDeTrucs
. . .
. . .
End Sub
Ce qui fait que l’objet Truc1 est Privé pour la procédure Creation, je ne peux donc pas, dans une autre procédure, utiliser Bouge(Truc1), il ne reconnait pas l’existence de l’objet.
Par contre si je le déclare en tête de Form1
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
Public Class Form1
Dim Truc1 as New ClasseDeTrucs
Il sera reconnu par la procédure Bouge(Truc1) mais je ne peux plus en créer et en disposer à ma guise.

Dans son tutoriel p49 Serge Tahé présente un tableau d’objets sous la forme
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Dim TabTrucs(10) as ClasseDeTrucs
qui peut être Public et accessible partout. Ce qui permet d’écrire par exemple :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Bouge(TabTrucs(1))
En gardant la possibilité de construire et disposer de mes objets comme je le souhaite. Je pourrai aussi les désigner par un TabTrucs(i) qui me paraît plus simple à gérer que leur nom Truc1, Truc2, etc.

Est-ce la meilleure technique ?
Les Classes ne créent –elles pas ce type de tableau avec une indexation automatique des objets créés ?
Merci de me conseiller