vb编程没那么多财富只能尽我所能了设有如下两组数据：A：2,8,7,6,4,28,70,25B:79,27,32,41,57,66,78,80编程把上面两组数据分别读入两个数组中，然后把两个数组中对应下标的元素相加，即2+79,8+27

Question

vb 编程 没那么多财富 只能尽我所能了
设有如下两组数据：
A：2,8,7,6,4,28,70,25
B: 79,27,32,41,57,66,78,80
编程把上面两组数据分别读入两个数组中，然后把两个数组中对应下标的元素相加，即2+79,8+27…，并把相应的结果放入第3个数组C中，最后输出数组C的元素值。

Answer 1

Sub test()
Dim a, B, c()
Dim i As Integer
a = Array(2, 8, 7, 6, 4, 28, 70, 25)
B = Array(79, 27, 32, 41, 57, 66, 78, 80)
i = UBound(a)
ReDim c(0 To i)
For i = 0 To UBound(a)
c(i) = a(i) + B(i)
Print c(i)
Next
End Sub