「VB.NET」Enum.GetValuesメソッドで列挙の値を取得する

書式
Enum 列挙名
要素xxx
End Enum
For Each 変数名 In [Enum].GetValues(GetType(列挙型名))
処理コード
Next
サンプルコード

Module Module1
    '列挙型の宣言
    Enum WeekInfo
        Sunday
        Monday
        Tuesday
        Wednesday
        Thursday
        Friday
        Saturday
    End Enum

    Public Sub Main()
        Console.WriteLine("enum(列挙子)の基本用例")
        'Enum.GetValuesメソッドで全ての値を列挙させます
        For Each item In [Enum].GetValues(GetType(WeekInfo))
            Console.WriteLine((item.ToString()))
        Next

        Console.ReadKey()
    End Sub
End Module

実行結果
enum(列挙子)の基本用例
Sunday
Monday
Tuesday
Wednesday
Thursday
Friday
Saturday

VB.net

Posted by arkgame