Discussion :

[Contrec]

Bonjour,

Etant débutant en VBA, je bloque sur un point :

Je possède un objet Connector avec à l'intérieur une collection d'objets Wire, lorsque je veux accèder à ma liste de Wires de mon objet Collector :

currentCollector.WiresAtBegin

le compliteur me dit "Argument non facultatif".

Voici la déclaration de mon objet Connector avec ses getter et setter :

Code :

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
 
Private mWiresAtBegin As New Collection ' Liste des câbles en entrée
Private mWiresAtEnd As New Collection ' Liste des câbles en sortie
 
Property Get WiresAtBegin() As Collection
    WiresAtBegin = mWiresAtBegin
End Property
 
Property Let WiresAtBegin(WiresAtBegin As Collection)
    mWiresAtBegin = WiresAtBegin
End Property
 
Property Get WiresAtEnd() As Collection
    WiresAtEnd = mWiresAtEnd
End Property
Property Let WiresAtEnd(WiresAtEnd As Collection)
    mWiresAtEnd = WiresAtEnd
End Property

Je précise que je suis en VB 6.0

On peut très bien avoir une collection dans un objet et y accéder comme tout autre membre non ?

Si quelqu'un a une piste pour que currentCollector.WiresAtBegin passe sans encombres...

Merci d'avance.

[Contrec]

Je viens de me rendre compte qu'en fait cette erreur sort à chaque fois que je fais des getter sur des collections contenues dans des objets...

Donc si quelqu'un peut me dire si je m'y prend mal pour gérer des collections dans les objets...

[tirex28]

Bonsoir,

Une collection est un objet, il faut donc utiliser Set:

Code :

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

1
2
3
4
5
6
7
8
9
Private mWiresAtBegin As Collection ' Liste des câbles en entrée
 
Property Get WiresAtBegin() As Collection
    Set WiresAtBegin = mWiresAtBegin
End Property
 
Property Set WiresAtBegin(WiresAtBegin As Collection)
    Set mWiresAtBegin = WiresAtBegin
End Property

Si la propriété est en lecture/écriture le mot New est inutile dans la déclaration.

Cordialement,

Tirex28/

[Contrec]

C'est exactement ça, ça marche nickel !

Je te remercie !


--> Tag résolu