Discussion :

[EvaristeGaloisBis]

bonjour
j'ai créé une classe de classe pour voir comment ça tournait.

J'ai voulu verrouiller en ecriture donc j'ai mis des property get pour acceder a mes sous classe. Seulement avec cette méthode je n'arrive pas a atteindre les methodes et propriétés présentes dans mes sous classes. Comment puis je faire?
je vais mettre le code ce sera peut être plus parlant :

Code Code de la Classe qui contient des sous classes :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
dim cldCadreSup, cldCadre, cldMaitrise, cldEmploye, cldOuvrier As Demographie
Dim dtaux(5), dChargement(5) As Double
'Dim taux(5) As Double
Property Get CadreSup()
    CadreSup = cldCadreSup
End Property
 
Private Sub class_initialize()
 
Set cldCadreSup = New Demographie
Set cldCadre = New Demographie
Set cldMaitrise = New Demographie
Set cldEmploye = New Demographie
Set cldOuvrier = New Demographie
 
cldCadreSup.InitDemo (11)
cldCadre.InitDemo (12)
cldMaitrise.InitDemo (13)
cldEmploye.InitDemo (14)
cldOuvrier.InitDemo (15)
 
 
End Sub

mais comme je l'ai programmé, je n'ai pas réussi a atteindre l'effectif qui été dans ma cldCadeSup, a cause du get. comment puis je faire pour contourner ce problème, mis à part ecrire des get pour chaque possibilité?

[EvaristeGaloisBis]

Ma question est nulle et non avenue.
J'ai trouvé dans le tuto http://sinarf.developpez.com/access/vbaclass/
j'avais mal lu un truc c'est pour ça. !

Pour ceux que ça interessent, il faut utiliser une collection de sa classe pour ne plus avoir mon problème.

@micalement