主题：求助，任意一个数组进行代码实现相加的结果

不知道要表达的啥意思，如果是计算一字符串的和，试试以下代码

Dim a As String = "123457"
Dim c As Double
For i As Integer = 0 To a.Length -1
    c += val(a(i))
Next
Output.Show(c)