如何从它的价值获得枚举描述？
Public Shared Function GetEnumDescription(ByVal EnumConstant As [Enum]) As String
Dim fi As FieldInfo = EnumConstant.GetType().GetField(EnumConstant.ToString())
Dim attr() As DescriptionAttribute = _
DirectCast(fi.GetCustomAttributes(GetType(DescriptionAttribute),_
False),DescriptionAttribute())
If attr.Length > 0 Then
Return attr(0).Description
Else
Return EnumConstant.ToString()
End If
End Function
GetEnumDescription([Enum].GetName(GetType(myEnum),2)))
但我没有尝试过是正确的.
如果你有一个enum类型的变量,那就是简单的
GetEnumDescription(myEnum)
最小工作实例：
Enum TestEnum
<Description("Description of Value1")>
Value1
End Enum
Public Sub Main()
Dim myEnum As TestEnum = TestEnum.Value1
Console.WriteLine(GetEnumDescription(myEnum)) ' prints "Description of Value1"
Console.ReadLine()
End Sub
如果您有一个Integer变量,则需要先将其转换为您的枚举类型(CType也可以使用)：
GetEnumDescription(DirectCast(myEnumValue,TestEnum))
工作实例：
Enum TestEnum
<Description("Description of Value1")>
Value1 = 1
End Enum
Public Sub Main()
Console.WriteLine(GetEnumDescription(DirectCast(1,TestEnum)))
Console.ReadLine()
End Sub
您的混淆的根源似乎是一个误会：您的方法不会将枚举的“名称”作为参数,它将枚举作为参数.这是不同的,这也是为什么尝试使用GetName失败的原因.