Question

我有以下枚举：

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

遗憾的是，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

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 3

查看Enum.GetValues(Type)

Answer 4

我希望您需要使用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 5

我知道这已经得到了解答，但在我看来，这已经过度思考了。为什么不这样做？

    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

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

5 个答案: