在VB.Net中定义字符串ENUM

前端之家收集整理的这篇文章主要介绍了在VB.Net中定义字符串ENUM前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我正在为我的项目使用Window应用程序。有情况我需要定义字符串枚举并在我的项目中使用它。

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

    Public Enum Test
        PersonalInfo
        Contanct
    End Enum

现在我想要将该变量PersonalInfo和Contract作为“个人信息”和“个人连接”的价值。

如何使用ENUM获取此值?或任何其他方式来做到这一点。

提前致谢…

你可以创建一个新的类型
''' <completionlist cref="Test"/>
Class Test

    Private Key As String

    Public Shared ReadOnly Contact  As Test = New Test("Personal Contanct")
    Public Shared ReadOnly PersonalInfo As Test = New Test("Personal Info")

    Private Sub New(key as String)
        Me.Key = key
    End Sub

    Public Overrides Function ToString() As String
        Return Me.Key
    End Function
End Class

当你使用它,它看起来像一个枚举:

Sub Main

    DoSomething(Test.Contact)
    DoSomething(Test.PersonalInfo)

End Sub

Sub DoSomething(test As Test)
    Console.WriteLine(test.ToString())
End Sub

输出

Personal Contanct Personal Info

原文链接:https://www.f2er.com/vb/256011.html

猜你在找的VB相关文章