[英]Vb.net custom attribute to an enum
我有这个枚举:
<Flags()>
Public Enum FilterEnum As Integer
Green= 0
Blue = 1
Red = 2
Yellow = 4
End Enum
我想给“ Green”和“ Yellow”一些属性,所以当我得到这样的枚举时:
Dim enumItems = [Enum].GetValues(myEnum)
我将仅获得具有该属性的人的Enum值,如下所示:
Dim enumItems = [Enum].GetValues(myEnum).where(function(o) o.myAttribute)
您可以通过以下方式创建自定义属性:
<AttributeUsage(AttributeTargets.Field)>
Public Class SomeAttribute
Inherits System.Attribute
Public Property SomeValue As String
End Class
然后创建您的枚举并用属性装饰字段:
Public Enum MyEnum
<Some(SomeValue:="Good One")>
Member1 = 1
<Some(SomeValue:="Bad One")>
Member2 = 2
<Some(SomeValue:="Good One")>
Member3 = 3
End Enum
并使用此查询,获取所需的内容,例如“ Good One”
'Indented to be more readable step by step
Dim result As List(Of MyEnum) = _
GetType(MyEnum).GetFields() _
.Where(Function(field) _
field.GetCustomAttributes(True) _
.Cast(Of SomeAttribute) _
.Any(Function(attribute) attribute.SomeValue = "Good One")) _
.Select(Function(filtered) _
CType(filtered.GetValue(Nothing), MyEnum)) _
.ToList()
结果将是:
也许您可以使用System.ComponentModel.Description
<Flags()>
Public Enum FilterEnum As Integer
<System.ComponentModel.Description("value_1")>_
Green= 0
<System.ComponentModel.Description("value_2")>_
Blue = 1
<System.ComponentModel.Description("value_3")>_
Red = 2
<System.ComponentModel.Description("value_4")>_
Yellow = 4
End Enum
然后,检查它们,以便从Description属性获取Enum
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.