通过整数类型枚举进行简单迭代？

Question

我有以下枚举：

Public Enum myEnum As Integer  
    first = &H1
    second = &H2
    third = &H4
    fourth = &H8
    fifth = &H10
    sixth = &H20
End Enum

不幸的是，枚举元素必须具有这些值，或者至少具有可以进行二进制比较的值。

我有一个类，可以在构造期间设置为两种类型之一，一种类型具有与第一到第四相关的值，第二种类型具有与第一到第六相关的值。

我想使用 For 循环来迭代枚举的 1-4 或 1-6 个元素，但我发现此代码：

For enumType as myEnum = myEnum.first to myEnum.fourth
Next

迭代 {1,2,3,4,5,6,7,8}而不是通过 {1,2,4,8}。
这并不理想。

显然，我可以围绕这个问题进行编码，但我可以看到在维护编程中很容易错过该解决方法的情况，并且我希望有人可以推荐一个不会破坏的简单解决方案，例如，如果枚举必须在以后更改。

Answer 1

抱歉，C#：

static IEnumerable<T> EnumRange<T>(T begin, T end)
{
    T[] values = (T[])Enum.GetValues(typeof(T));
    int beginIndex = Array.IndexOf(values, begin);
    int endIndex = Array.IndexOf(values, end);

    for(int i = beginIndex; i <= endIndex; ++i)
        yield return values[i];
}

foreach(MyEnum e in EnumRange(MyEnum.First, MyEnum.Fourth)
    // Code goes here

Answer 2

我希望您需要使用 Enum.GetValues()，并将结果过滤为您想要的结果。 例如，使用 LINQ ）（并使用 C#，因为我不太了解 VB）：（

注意：这里重要的是 GetValues - VB 和 C# 之间应该是相同的）

static void Main() {
    var qry = from MyEnum value in Enum.GetValues(typeof(MyEnum))
              where value >= MyEnum.First && value <= MyEnum.Fourth
              orderby value // to sort by value; remove otherwise
              select value;

    foreach (var value in qry) {
        Console.WriteLine(value);
    }
}
enum MyEnum { 
    First = 0x01,
    Second = 0x02,
    Third = 0x04,
    Fourth = 0x08,
    Fifth = 0x10,
    Sixth = 0x20
}

Answer 3

Marc 基本上是正确的，除了您不需要显式排序（Enum.GetValues 已经返回排序），并且您需要对输出进行强制转换：

enum myEnum
{
    first = 0x1,
    second = 0x2,
    third = 0x4,
    fourth = 0x8,
    fifth = 0x10,
    sixth = 0x20,
}

public static void Main(string[] a)
{
    var qry = from myEnum value in Enum.GetValues(typeof(myEnum))
        where value >= myEnum.first && value <= myEnum.fourth
        select value;
    foreach(var value in qry)
    {
        Console.WriteLine((int)value);
    }
}

Answer 4

我知道这个问题已经得到了回答，但在我看来，这似乎是想太多了。 为什么不这样做呢？

    Private Shared Sub Main()

        Dim aryEnums As Array = [Enum].GetValues(GetType(myEnum))

        For i As Integer = 0 To aryEnums.GetLength(0) - 1

            Console.WriteLine(aryEnums(i))

        Next

    End Sub

Answer 5

查看Enum.GetValues(Type)