enum VB.NET의 도움을 받아 설정하기

Question

나는 자바 프로그램을 vb.net으로 번역하고있다. 응용 프로그램의 설정은 열거 형으로 제어된다.

private enum SmsTagRule { 
    //  KEYWORD DOMAIN BusinessClass PREFIX SEARCHNAME SEARCHPARAM SENDEMAIL KEYWORDS... 
    BAG_TAG("BagTag", "BagTag", "FoundBagTag", "b", "SearchBagTag", "490_TagNumber", true, "BagTag"), 
    SKI_TAG("SkiTag", "SkiTag", "FoundSkiTag", "a", "SearchSki", "518_LabelNo", false, "SkiTag", "ski"), 
    PC_TAG("PcTag", "ds", "FoundPC", "", "SearchPcTag", "585_LabelNo", false, "pc"); 

마녀에 따라 선택한 설정에서 '태그'가 반환됩니다. vb.NET에서이 작업을 수행 할 수있는 방법이 있습니까? 나는이 TAG의 각각에 대해 하나의 열거 형을 만드는 것에 대해 생각해 왔지만 이것이 더 나은 해결책이되어야하는 것처럼 보인다. 어떤 아이디어?

Answer 1

은에 이동하여 설정을 나타내는 사용자 정의 형식을 만듭니다

Class TagRule 

    Public Shared BAG = new TagRule("BagTag", "BagTag", "FoundBagTag", ...) 
    Public Shared Ski = new TagRule("SkiTag", "SkiTag", "FoundSkiTag", ...) 
    ... 

    Dim _keyword As String 
    Public Property Keyword as String 
     Public Get 
      return _keyword   
     End 
     Private Set 
      _keyword = value 
     End 
    End Property 

    ... 

    Private Sub New(keyword as String, domain as String, businessclass as String, ...) 
     _keyword = keyword 
     _domain = domain 
     .... 
    End Sub 

End Class 

을 그리고 당신은 다음과 같이 사용할 수 있습니다 :

Dim setting As TagRule = Nothing 

If somecondition Then 
    setting = TagRule.Ski 
Else 
    setting = TagRule.BAG 
End If 

Dim keyword = setting.Keyword 
Dim domain = setting.Domain