Bonjour,

J'ai un objet qui fait référence à une classe
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
Dim monStock as new Stock.
Lorsque je passe l'objet dans une procédure que soit par Byval ou ByRef le résultat est le même : mon objet est modifié à chaque fois.

Exemple :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
monStock._numart = "ADA"
call change_numart(monStock)
messagebox.show(monStock._numart,....)

-----------------------------------------
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
private sub change_numart(byval objStock as Stock)
 
          objStock._numart ="DAD"
 
end Sub
Resulat du messagebox: DAD

C'est un exemple purement exemple. (J'aurais pu faire une méthode et y faire appelle) mais bon

Pourquoi mon objet est-il modifier??? Par ByRef j'aurais compris mais par ByVal??

D'avance merci. OLBI