Passer un Label en référence dans une Sub

Bonjour,

J'ai plusieurs labels dans ma MainWindow dont je veux changer la visibility sur des conditions spécifiques.

J'essaye donc de faire :

Code:

---

1 2 3 4 5 6

Friend Sub test(ByRef Monlabel As Label)   Monlabel.Visibility = Visibility.Visible     End Sub

---

Sur le MonLabel.visibility j'ai le message : BC30456: 'Visibility' n'est pas un membre de 'Label'.

J'ai bien essayé le correctif associé à BC30456: <VBRuntime>Default</VBRuntime> dans le <PropertyGroup> de mon projet, mais ça ne change rien.

Il y a quelqu'un qui a déjà eu ce problème?