字符串解析
可以通过解析 Enum 的字符串表示来创建 Enum 实例。
Module Module1
    Enum Size
        Small
        Medium
        Large
    End Enum
    Sub Main()
        Dim shirtSize As Size =  DirectCast([Enum].Parse(GetType(Size), "Medium"), Size)
        ' Prints 'Medium'
        Console.WriteLine(shirtSize.ToString())
        ' Waits until user presses any key
        Console.ReadKey()
    End Sub
End Module
另请参阅: 在 VB.NET 中将字符串解析为 Enum 值