Vytváření vlastních atributů (Visual Basic)
Vlastní atributy můžete vytvořit definováním třídy atributů, třídy, která je odvozena přímo nebo nepřímo z Attribute, což usnadňuje a usnadňuje identifikaci definic atributů v metadatech. Předpokládejme, že chcete označit typy názvem programátora, který typ napsal. Můžete definovat vlastní Author třídu atributů:
<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
Název třídy je název atributu, Author. Je odvozen z System.Attribute, takže je to vlastní třída atributu. Parametry konstruktoru jsou poziční parametry vlastního atributu. V tomto příkladu name je poziční parametr. Všechny veřejné pole nebo vlastnosti pro čtení i zápis jsou pojmenované parametry. V tomto případě version je jediný pojmenovaný parametr. Všimněte si použití AttributeUsage atributu Author k tomu, aby byl atribut platný pouze u třídy a Structure deklarací.
Tento nový atribut můžete použít následujícím způsobem:
<Author("P. Ackerman", Version:=1.1)>
Class SampleClass
' P. Ackerman's code goes here...
End Class
AttributeUsage má pojmenovaný parametr, AllowMultiplepomocí kterého můžete vytvořit vlastní atribut s jedním použitím nebo více použití. V následujícím příkladu kódu se vytvoří atribut multiuse.
' multiuse attribute
<System.AttributeUsage(System.AttributeTargets.Class Or
System.AttributeTargets.Struct,
AllowMultiple:=True)>
Public Class Author
Inherits System.Attribute
V následujícím příkladu kódu se na třídu použije více atributů stejného typu.
<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
Poznámka:
Pokud třída atributu obsahuje vlastnost, musí být tato vlastnost read-write.
