* "Cc" <ko*****@singnet.com.sg> scripsit:
is there a way to create enum that contain string?
"No."
My FAQ:
\\\
Imports System.ComponentModel
Imports System.Reflection
..
..
..
MsgBox(GetDescription(Weekdays.Wed))
..
..
..
Private Enum Weekdays
<Description("Sunday.")> _
Sun
<Description("Monday.")> _
Mon
<Description("Tuesday.")> _
Tue
<Description("Wednesday.")> _
Wed
<Description("Thursday.")> _
Thu
<Description("Friday.")> _
Fri
<Description("Saturday.")> _
Sat
End Enum
Private Function GetDescription(ByVal EnumConstant As [Enum]) As String
Dim fi As FieldInfo = EnumConstant.GetType().GetField(EnumConstant.ToStr ing())
Dim aattr() As DescriptionAttribute = _
DirectCast( _
fi.GetCustomAttributes(GetType(DescriptionAttribut e), False), _
DescriptionAttribute() _
)
If aattr.Length > 0 Then
Return aattr(0).Description
Else
Return EnumConstant.ToString()
End If
End Function
///
--
Herfried K. Wagner [MVP]
<URL:http://dotnet.mvps.org/>
