Bonsoir,
J'ai créer une première classe toute simple de type

cPoint2D qui a 2 propriétés : X et Y

Je viens de créer une nouvelle classe
cNouvelle qui possède 3 propriété ,
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
A as single
B as double
Pt as cPoint2D
avec les routines
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Property Get Pt() As cPoint2D
    ' Propriété en lecture
    Pti = mPt
End Property
Property Let Pt(Point As cPoint2D)
    ' Propriété en écriture
    mPt = Point
End Property
C'est içi que réside le pb
Dans un module j'écris
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
  dim Nouv as new cNouvelle
  Nouv.Pti.X=2
Pas d'erreur à l'écriture mais si je lance l'exécution
il y a une erreur au retour (dernière ligne) de
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Property Get Pt() As cPoint2D
    ' Propriété en lecture
    Pti = mPt
End Property
1) Quelqu'un peut il m'explique comment créer un objet contenant un autre objet utilisateur?
2) Dans le même style comment integrer un tableau dans une nouvelle classe d'utilisateur
Merci par avance