Enumeration

[jojo116]

Hey

Can I use enumeration in a loop? something like this:

    Enum Days As Integer
        Monday = 1
        Tuesday = 2
        Wednesday = 3
    End Enum

        ' I dont want to do it like this:
        ListBox1.Items.Add(Days.Monday.ToString)
        ListBox1.Items.Add(Days.Tuesday.ToString)
        ListBox1.Items.Add(Days.Wednesday.ToString)

        ' But like this:
        Dim i As Integer

        For i = 1 To 3
            ' Here I would like to set the days by a integer to string.
            ' Something like this:
            ' ListBox1.Items.Add(Days.(i).ToString)
        Next

[VBDT]

Yes you can, try this:

If [Enum].IsDefined(GetType(Days), i) Then
    ListBox1.Items.Add([Enum].GetName(GetType(Days), i))
End If

Or a better way would be just one line without any loop:

ListBox1.DataSource = [Enum].GetValues(GetType(Days))

[jojo116]

Thanks