Comprendre la conformité CLS et le code correct

Question

J'ai essayé de créer un contrôle abstrait pour gérer une partie de l'état dans notre application. Cependant, j'ai couru une faute de quelques issues de CLS et espérais que quelqu'un pourrait fournir un aperçu.

J'ai une énumération en tant que tel:

<Flags()> _ 
Public Enum FormState 
    Read = 1 
    Edit = 2 
    Insert = 4 
End Enum 

Et une classe en tant que telle:

Public MustInherit Class Fields 
    Inherits System.Web.UI.UserControl 

    Public Property State() As Enumerators.FormState 
     Get 
      Return _State 
     End Get 

     Set(ByVal value As Enumerators.FormState) 
      _State = value 
      ToggleState(value) 
     End Set 
    End Property 

    Protected MustOverride Sub ToggleState(ByVal state As FormState) 
End Class 

Lorsque je tente de compiler ce code, je suis parti avec un avertissement que le Etat propriété n'est pas compatible CLS et l'argument state non plus. Comment venir? Et comment puis-je corriger ce problème pour supprimer les avertissements?

• J'ai essayé d'ajouter le < CLSCompliant (True)> attribut à deux éléments sans chance
• J'ai essayé de diffuser l'article MSDN Non-CLS-compliant 'MustOverride' member is not allowed in a CLS-compliant dans le code avec aucun résultat
• I » avons essayé de changer les accesseurs Friend au lieu de Public
• J'ai essayé spécifier un type pour le Enum (Integer et UInteger)

Answer 1

En regardant votre code, l'énumération semble faire partie d'une classe appelée énumérateurs. La classe n'est pas répertoriée dans votre code, mais je suppose que vous avez un contrôle total sur elle.

La classe doit également être étiquetée avec l'attribut CLS.

Answer 2

Pour supprimer les avertissements ajouter les attributs suivants afin que l'aspect classe, la méthode et la propriété comme ceci:

<CLSCompliant(False)> _ 
Public MustInherit Class Fields 
    Inherits System.Web.UI.UserControl 

    <CLSCompliant(False)> _ 
    Public Property State() As Enumerators.FormState 
     Get 
      Return _State 
     End Get 

     Set(ByVal value As Enumerators.FormState) 
      _State = value 
      ToggleState(value) 
     End Set 
    End Property 

    <CLSCompliant(False)> _ 
    Protected MustOverride Sub ToggleState(ByVal state As FormState) 
End Class 

Cela signifie au compilateur que vous voulez que les avertissements supprimés et que vous êtes au courant de votre code n'est pas conforme CLSC.

Answer 3

Il se pourrait que vous ne disposez pas d'un élément avec la valeur 0.