如何將字符串數組的每個元素轉換為整數？ （VB）

Question

對於我當前的任務，我必須使用數組讀取8位數字的卡號。 我在代碼的開頭聲明了這個數組：

Dim LoyaltyCardDigits(8) As Integer

之所以將其聲明為整數，是因為讀入后需要對這些數組元素進行計算。我正在從文本框中讀取8個字符，然后將這些字符分配給變量。

CardNumber = txtCardNumber.Text

我將這些字符分配給數組元素； 但這是我堅持的問題。

Private Sub btnSubmitDetails_Click(sender As Object, e As EventArgs) Handles btnSubmitDetails.Click

    For Counter = 1 To 8
        LoyaltyCardDigits(Counter) = Mid(CardNumber, Counter, 1)
    Next Counter

因此，總而言之，我想要一個將數組元素從字符串轉換為整數的解決方案，以便執行計算。 我已經編寫了代碼，因此無需擔心驗證。 由於我對VB非常陌生，因此我希望盡可能簡化任何幫助，但我顯然會接受任何可行的方法。

Answer 1

您說您已經做好了驗證工作，因此請嘗試以下操作：

Private Sub btnSubmitDetails_Click(sender As Object, e As EventArgs) Handles btnSubmitDetails.Click
    If CardNumber.Length = 8 Then
        For i As Integer = 0 To 7
            LoyaltyCardDigits(i) = CInt(CardNumber.Substring(i, 1))
        Next

        ' ... now do something with LoyaltyCardDigits ...

    End If
End Sub