Classes et modules

[Résolu]
Signaler
Messages postés
256
Date d'inscription
jeudi 17 avril 2003
Statut
Membre
Dernière intervention
20 février 2008
-
Messages postés
15814
Date d'inscription
jeudi 8 août 2002
Statut
Modérateur
Dernière intervention
4 mars 2013
-
salut à tous !
J'ai un petit problème et je ne comprends pas très bien pourquoi :
pour simplifier:
dans class1 : public nb as integer
dans module1 : public function ajouter(c as class1) as class1
ajouter.nb=c.nb+1
end function

et quand j'appelle ajouter, ca me dit "object or with block variable not set"
(meme erreur si la ligne est set ajouter.nb = c.nb + 1)

Pourquoi ?

Merci de répondre.
A+.
Thomas.

2 réponses

Messages postés
15814
Date d'inscription
jeudi 8 août 2002
Statut
Modérateur
Dernière intervention
4 mars 2013
126
Essaye plutôt :

public function ajouter(c as class1) as class1
Dim Add as new class1
Add.nb=c.nb+1
set ajouter = Add
end function

_____________________________________________________________________
3
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 112 internautes nous ont dit merci ce mois-ci

Messages postés
256
Date d'inscription
jeudi 17 avril 2003
Statut
Membre
Dernière intervention
20 février 2008
1
désolé je viens de me rendre compte qu'il faut faire
public function ajouter(.......) as class1
set ajouter = new class1
...


P.S : si quelqu'un sait quand est ce qu'il faut utiliser new ou pas ...


je ne sais jamais si quand on fait set A = B (avec A et B 2 objets de class1), si l'ordinateur égalise propriété par propriété A à B, ou bien s'il fait pointer A sur B.
Si quelqu'un a la réponse je suis preneur