如何在VB.NET中将数组设置为值列表？

我不知道如何将数组设置为两组数字中的一组（后面还会有更多），我尝试的每一种方法都会抛出某种错误。我曾试图在case语句中对数组进行调暗，但随后我无法在For Each中使用数组，这使得该数组毫无价值。。。。任何想法都将不胜感激

代码：

---

将数组分配给现有变量时，必须显式使用构造函数：

HourArray = New Integer() { 6, 7, 8, 9, 10, 11, 12, 13 }

这与构造函数是可选的声明和赋值不同：

Dim HourArray() As Integer = { 6, 7, 8, 9, 10, 11, 12, 13 }

---

多亏了你们两位，这一切都成功了，我觉得这真的很容易，但我的大脑今天不想做+我对马克和本都投赞成票，如果我能接受马克的，我会接受，因为他是第一名。@IPX阿瑞斯：事实上，我认为我不幸是第二名。

HourArray = New Integer() { 6, 7, 8, 9, 10, 11, 12, 13 }

Dim HourArray() As Integer = { 6, 7, 8, 9, 10, 11, 12, 13 }

    Dim hourArray As List(Of Integer)

    Select Case CurrentShapeRow(ROW_PERIOD)
        Case "ON", "2X16"
            hourArray.AddRange(New Integer() {6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21})
        Case "2X8", "5X8"
            hourArray.AddRange(New Integer() {0, 1, 2, 3, 4, 5, 22, 23})
        Case Else
            Throw New Exception(String.Format("Unhandled Period: {0}", CurrentShapeRow(ROW_PERIOD)))
    End Select

For Each i As Integer In hourArray
    Console.WriteLine(i)
Next