配列内のすべての数値を加算する

Question

私は配列に24個の数値が入っています。すべての数値を一緒に加算してからテキストボックスに表示したいと思います。これは配列用に作成したコードです。配列のすべての数値を一緒に追加する方法がわかりません。あなたの時間に感謝します。

'Calculating distances 
    Dim Game As String 

    Game = txtGameAdd.Text 

    SystemValueGame = SystemValueGame + 1 
    TotalGames(SystemValueGame) = Game 
    txtGameAdd.Text = "" 
    txtGameAdd.Focus() 

    'Keeping count with lables' 

    lblAmountNum.Text = SystemValueGame 

    'Double Checking SystemValue' 

    If SystemValueGame = 24 Then 

     'notify when array is full' 

     MsgBox("Entered Max Amount Of Surnames", MsgBoxStyle.Information) 

     txtGameAdd.Text = " " 
     txtGameAdd.Enabled = False 

    End If 

Answer 1

あなたはおそらくこれに非常に類似した何かをすることができます。

Dim ar As Array = Nothing 
    Dim sum As Integer = 0 

    For Each st As String In ar 
     sum = sum + CInt(st) 
    Next 

このようなメソッドは、配列のすべての値にアクセスし、それらを一緒に追加します。