如何在枚举中包含整数字符串？

Question

我知道这是一个正确的枚举：

Private Enum Months
  JANUARY = 1
  FEBRUARY = 2
  ...
End Enum

但是，我想要一个枚举，其中字符串仅是整数。

示例：

Private Enum ColumnCounts
  01 = 5
  02 = 4
  03 = 40
End Enum

01、02、03 都是字符串。但是，如果我输入“01”、[01] 或只是 01，它会告诉我它期望枚举结束，并且它不是有效的语句。有什么方法可以实现我所缺少的吗？我什至尝试过。 01.ToString()，但这不是一个选项。 :) 感谢任何和所有的帮助。谢谢。

编辑：

Public Class Part

  Private Enum ColumnCounts
    f01 = 39
  End Enum

  Public Shared Function ValidateColumns(ByRef lstFields As List(Of String)) As Boolean
    For Each colCount In [Enum].GetValues(GetType(ColumnCounts))
      If colCount = "f" + lstFields(1) Then
        'Right here I need to compare the count of the list vs. the value of the enum.'
        Return True
      End If
    Next

    Return False
  End Function
End Class

本质上，我不想把 f 放在那里，只是想做 01。调用它的方式是：

Select Case (nRecordType)
  Case "01"
    ...
  Case "02"
    ...
  Case "03"
    Return Part.ValidateColumns(_lstFields)
End Select

因为我没有创建它的实例，也没有调用构造函数，无法自动填充字典。我不想转换为整数，所以我不打算做一个数组。这是为了以防万一该值最终超过 99 并且下一个值将是 A0。我正在尝试考虑未来对此的简单更改以及向后兼容性。如果您需要更多解释，请告诉我。

编辑2：

这是我现在所做的，我认为它应该有效：

Public Class Part

  Private Shared columnCounts As Dictionary(Of String, Integer) = New Dictionary(Of String, Integer)

  Public Shared Function ValidateColumns(ByRef lstFiels As List(Of String)) As Boolean
    InitializeColumnDictionary()

    Return lstFields.Count = columnCounts(lstFields(1))
  End Function

  Private Shared Sub InitializeColumnDictionary()
    columnCounts.Add("01", 39)
  End Sub
End Class

我现在还不能测试它，所以我无法验证它是否会起作用我想要什么，但是当我构建它时它不会给我一个错误，所以我祈祷。

Answer 1

单独的整数不是有效的标识符。
为什么要将 01 称为标识符？
在枚举元素前面加上一个字母，就完成了：

i01,
i02
...

根据您的编辑进行编辑：
声明一个静态字典并在静态方法中填充它（如果它为空）：

private static void yourMethod()
        {
            if (ColumnCounts == null)
            {
                ColumnCounts = new Dictionary<String, int>();
                ColumnCounts.Add("01", 39);
                ColumnCounts.Add("02", 45);
                ColumnCounts.Add("03", 12);
                ColumnCounts.Add("04", 0);
            }




        }



        private static Dictionary<String, int> ColumnCounts = null;

Answer 2

枚举元素是标识符；并且标识符必须以字母（或下划线）开头。所以，我很抱歉，但这不可能。

注意：更正了评论后的起始字符。

Answer 3

您需要使用有效标识符 - 不能以数字开头。

Answer 4

抱歉，任何类型的标识符都不可能以整数开头。你可以这样做：

Private Enum ColumnCounts
  n01 = 5
  n02 = 4
  n03 = 40
End Enum

Answer 5

对于您的枚举，您应该使用 Column01 作为标识符。稍后在代码中，如果不需要 01 部分，您可以随时调用 .ToString() 并修剪 Column 部分。

Private Enum ColumnCounts 
  Column01 = 5 
  Column02 = 4 
  Column03 = 40 
End Enum 

Answer 6

$.02

Private Enum foo As Integer
    _01 = 1
    _02 = 2
    _03 = 3
    _04 = 4
End Enum

Dim bar As IEnumerable(Of String) = (From membr In [Enum].GetNames(GetType(foo)) Select membr.Replace("_", ""))

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

    Dim nRecordType As String = "03"

    Select Case nRecordType
        Case bar(0)
            Debug.WriteLine("stop1")
            Stop
        Case bar(1)
            Debug.WriteLine("stop2")
            Stop
        Case bar(2)
            Debug.WriteLine("stop3")
            Stop
        Case bar(3)
            Debug.WriteLine("stop4")
            Stop
    End Select

End Sub