Bonjour, voila je suis assez newb en VB.NET et je cherche à savoir si c'est possible de créer des objets invariants depuis la classe de cet objet.

J'arrive très bien à faire des invariants de type Integer ou String, mais de ma classe non.

Je sais qu'en C# c'est possible mais en VB.NET je n'y arrive pas.

Voici l'exemple de mon code

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
Public NotInheritable Class Level
 
    Public Const WARNING As Level = New Level(1, "WARNING")
 
 
    Dim _level As Integer
    Dim _levelName As String
 
    Sub New(ByVal level As Integer, ByVal levelName As String)
        _level = level
        _levelName = levelName
    End Sub
 
 
End Class
Premièrement je ne sais pas si je doit mettre NotInheritable dans la définition de ma classe.
Et ensuite pour ma constante WARNING j'ai les erreurs suivantes: "Les constantes doivent être de type intrinsèque ou énuméré, pas de type classe, structure ou tableau" et "Une expression de constante est requise"

Je sais qu'en C#c'est possible en faisant comme cela
Code : Sélectionner tout - Visualiser dans une fenêtre à part
public readonly static Level WARNING = new Level(1, "WARNING");
Merci d'avance