constructeur pour module de classe

Bonjour (encore moi!),
je cherche à faire un constructeur pour un module de classe, malheureusement ça bloque (toujours à cause de tableaux!désolé j'ai un peu de mal avec ce truc! :aie: )
je sais que les constructeurs n'existent pas par défaut en vb, je veux juste créer une méthode qui initialise un objet.
voilà mon module de classe (doté pour simplifier ici juste d'un tableau à 2 entrées):

Code:

---

1 2 3 4 5 6 7 8

Private CC() As Double Public Property Let C(ByRef cb() As Double) CC = cb End Property   Public Property Get C() As Double() C = CC End Property

---

voici ma méthode constructeur:

Code:

---

1 2 3 4 5

Public Sub linearconstraint( C() As Double)   Me.C = C   End Sub

---

et voilà comment j'instancie mon objet:

Code:

---

1 2 3

Dim clin As linearconstraint Set clin = New linearconstraint clin.linearconstraint CM

---

(CM est un tableau de double normal)
et bien vous me croirez si vous voudrez , mais ça :aie: et ferme excel et VBE direct.

Merci!

re bonjour,

le nom de la classe correspond au nom du module de classe...

Le constructeur est obligatoirement :

Code:

---

1 2 3 4

Private Sub class_Initialize() ... End Sub

---

Le destructeur :

Code:

---

1 2 3 4

Private Sub class_Terminate() ... End Sub

---

un excellent tuto pour tout savoir sur les classes VBA :
http://sinarf.developpez.com/access/vbaclass/

Philippe

merci pour ta réponse;
le lien est effectivement très clair...
Mais ne répond pas à mon problème. Oublions l'aspect constructeur, je voudrais juste comprendre pourquoi cette méthode:

Code:

---

1 2 3 4

Public Sub lc( b as double, C() As Double) Me.b = b Me.C = C End Sub

---

où b et C sont respectivement des propriétés de ma classe, double et double(), plante:
je précise que l'instruction

Code:

---

Me.b = b

---

passe, c'est

Code:

---

Me.C = C

---

qui fait planter excel.
par contre, un appel direct:
clin.C marche (clin est une instance de ma classe).

Essaye voir ainsi :

Code:

---

1 2 3 4 5 6 7 8

Private CC() As Double Public Property Let C(ByRef cb) CC = cb End Property   Public Property Get C() C = CC End Property

---

Comme c'est un peu objet, quel est le résultat du set ci-dessous dans le let ?

Code:

---

Set C = cc

---

Bonjour,
une différence évidente, toutes les procédures qui plantent attendent un argument tableau passé par valeur et par référence; ce qui n'est pas le cas de la property Let.