Примеры использования пользовательских атрибутов
Обновлен: Ноябрь 2007
В следующем примере создается пользовательский атрибут, который может быть применен только к классам:
Пример
<AttributeUsage(AttributeTargets.Class)> Public Class CustomAttribute
Inherits System.Attribute
'Declare two private fields to store the property values.
Private m_LlabelValue As String
Private m_VValueValue As Integer
'The Sub New constructor is the only way to set the properties.
Public Sub New(ByVal _Label As String, ByVal _Value As Integer)
m_LlabelValue = _Label
m_VValueValue = _Value
End Sub
Public ReadOnly Property Label() As String
Get
Return m_LlabelValue
End Get
End Property
Public ReadOnly Property Value() As Integer
Get
Return m_VValueValue
End Get
End Property
End Class
Свойства, определенные в данном атрибуте, могут устанавливаться только в конструкторе данного класса атрибута. Следующий код демонстрирует способ применения такого атрибута:
' Apply the custom attribute to this class.
<Custom("Some metadata", 66)> Class ThisClass
' Add class members here.
End Class
См. также
Задачи
Практическое руководство. Определение пользовательских атрибутов
Практическое руководство. Извлечения настраиваемых атрибутов
Основные понятия
Извлечение информации, сохраненной в атрибуте