將字符串轉換為其整數類型分配的值

Question

使用VB.net中的以下代碼，我有一些變量（HUCROW1，HUCROW2，HUCROW3）是整數類型，並且為每個變量分配了特定的值。 然后在循環中，我嘗試使HUCROW等於上述變量。 HUCROW是字符串類型，例如通過使用“ HUCROW”和1將其與循環號連接起來。

                HUCROW1 = 66                
                HUCROW2 = 84                
                HUCROW3 = 102                
                HUCROW4 = 120


        For j = 1 To 3                
            Dim HUCROW As String = "HUCROW" & (j)


            If ScheduleSht.Cells(HUCROW, 9).Value.Ticks <> Nothing Then
                HUCdates(i) = ScheduleSht.Cells(HUCROW, 9).value.Ticks
                HUCdates(i) = ScheduleSht.Cells(HUCROW, 9).value.Ticks
            Else
                HUCdates(i) = 0
            End If

        Next

我的目標是獲取HUCROW1值為66，但不起作用，並在ScheduleSht.Cells（HUCROW，9）.value.Ticks上給出“類型不匹配錯誤”，因為它不會將字符串HUCROW轉換為分配的數字。 任何有關如何將字符串類型“ HUCROW1”轉換為分配給HUCROW1的整數的幫助將不勝感激。

Answer 1

我認為使用數組或字典來存儲和檢索值會更容易。

數組樣本 （因為數組的索引從零開始，所以減去j）

Dim HUCROWS As Integer() = {66, 84, 102, 120}

For j = 1 To 3
    Console.WriteLine(HUCROWS(j - 1))
Next

字典樣本

Dim HUCROWS As New Dictionary(Of String, Integer) From {
    {"HUCROW1", 66},
    {"HUCROW2", 84},
    {"HUCROW3", 102},
    {"HUCROW4", 120}
}

For j = 1 To 3
    Dim HUCROW As String = "HUCROW" & j
    Console.WriteLine(HUCROWS(HUCROW))
Next

兩種代碼的結果

66
84
102