Character equivalent of elements in an Enumeration

[ashishraj14]

I have an enumeration as follows

Public Enum Delimiters
Tab
Semicolon
Comma
Space
End Enum

How can I return character equivalent of the elements in the enumeration?

Should I write a Function which checks each element and return character equivalent or is there any other way as well?

Thanks

 

[petrusp]

I'd go with the function.

 

[RiverGuy]

Public Class Delimiters
    Public Shared ReadOnly Property Tab() As Char
        Get
            Return ControlChars.Tab
        End Get
    End Property
    Public Shared ReadOnly Property SemiColon() As Char
        Get
            Return Convert.ToChar(";")
        End Get
    End Property
End Class
...
etc.

Use as
Dim c As Char = Delimiters.SemiColon

 

[ashishraj14]

RiverGuy

Enum Delimiters is used in property as follows, which allows user to set a delimiter. How would creating a class help?

Public Property Delimiter() As Delimiters
Get
Return m_enmDelimiter
End Get
Set(ByVal Value As Delimiters)
m_enmDelimiter = Value
End Set
End Property

 

[PankajBanga]

Use Asc value of each character in the Enum as follows

Public Enum Delimiters
Tab = Asc(vbTab)
Semicolon = Asc(";")
Comma = Asc(",")
Space = Asc(" ")
End Enum

Then simply retrieve the character using

Dim strDelimiter As String = Chr(Delimiters.Semicolon)

You can also use actual numeric values instead of Asc values