Condividi tramite

Creazione di attributi personalizzati (Visual Basic)

È possibile creare attributi personalizzati definendo una classe di attributi, una classe che deriva direttamente o indirettamente da Attribute, che semplifica l'identificazione delle definizioni degli attributi nei metadati. Si supponga di voler contrassegnare i tipi con il nome del programmatore che ha scritto il tipo. È possibile definire una classe di attributi personalizzata Author :

<System.AttributeUsage(System.AttributeTargets.Class Or
                       System.AttributeTargets.Struct)>
Public Class Author
    Inherits System.Attribute
    Private name As String
    Public version As Double
    Sub New(ByVal authorName As String)
        name = authorName
        version = 1.0
    End Sub
End Class

Il nome della classe è il nome dell'attributo, Author. È derivato da System.Attribute, quindi è una classe di attributi personalizzata. I parametri del costruttore sono i parametri posizionali dell'attributo personalizzato. In questo esempio è name un parametro posizionale. Tutti i campi o le proprietà pubbliche di lettura/scrittura sono parametri denominati. In questo caso, version è l'unico parametro denominato. Si noti l'uso dell'attributo AttributeUsage per rendere l'attributo Author valido solo su classi e dichiarazioni Structure.

È possibile usare questo nuovo attributo come indicato di seguito:

<Author("P. Ackerman", Version:=1.1)>
Class SampleClass
    ' P. Ackerman's code goes here...
End Class

AttributeUsage ha un parametro denominato, AllowMultiple, con cui è possibile creare un attributo personalizzato a uso singolo o multiuso. Nell'esempio di codice seguente viene creato un attributo multiuso.

' multiuse attribute
<System.AttributeUsage(System.AttributeTargets.Class Or
                       System.AttributeTargets.Struct,
                       AllowMultiple:=True)>
Public Class Author
    Inherits System.Attribute

Nell'esempio di codice seguente vengono applicati più attributi dello stesso tipo a una classe.

<Author("P. Ackerman", Version:=1.1),
Author("R. Koch", Version:=1.2)>
Class SampleClass
    ' P. Ackerman's code goes here...
    ' R. Koch's code goes here...
End Class

Annotazioni

Se la classe di attributi contiene una proprietà, tale proprietà deve essere di lettura/scrittura.

Vedere anche

  • Last updated on