vb.net - 在 VB.Net 中定义字符串 ENUM

Question

我正在为我的项目使用 Window 应用程序。在某些情况下，我需要定义字符串枚举并在我的项目中使用它。

即

Dim PersonalInfo As String = "Personal Info"
Dim Contanct As String = "Personal Contanct"

    Public Enum Test
        PersonalInfo
        Contanct
    End Enum

现在我希望该变量 PersonalInfo 和 Contract 的值作为“个人信息”和“个人联系人”。

如何使用 ENUM 获取此值？或任何其他方式。

提前致谢...

Answer 1

对于非整数值，可以使用 Structure(或 Class)中的 Const 代替:

Structure Test
    Const PersonalInfo = "Personal Info"
    Const Contanct = "Personal Contanct"
End Structure

或在 Module 中直接访问而无需 Test. 部分:

Module Test
    Public Const PersonalInfo = "Personal Info"
    Public Const Contanct = "Personal Contanct"
End Module

---

在某些情况下，变量名可以作为一个值:

Enum Test
    Personal_Info
    Personal_Contanct
End Enum

Dim PersonalInfo As String = Test.Personal_Info.ToString.Replace("_"c, " "c)

' or in Visual Studio 2015 and newer:
Dim Contanct As String = NameOf(Test.Personal_Contanct).Replace("_"c, " "c)