Public Class Class1
 
    'gemeinsame Eigenschaft aller Class1-Instanzen
    Public Shared Property prop_shared As String
 
    'spezifische Eigenschaft einer Class1-Instanz
    Public prop_instance As String
 
End Class

    Class1.prop_shared = "Wert in Class1"
 
    Dim c1 As New Class1
    c1.prop_instance = "Wert in C1"
 
    'Fehler: Der Verweis auf einen nicht freigegebenen Member 
    'erfordert einen Objektverweis:
    Class1.prop_instance = "xxx"