Question

vb编写一个程序，把上面两组数据分别读入两个1、设有如下两组数据：

编写一个程序，把上面两组数据分别读入两个1、设有如下两组数据：
A：2,8,7,6,4,28,70,25
B：79,27,32,41,57,66,78,80
数组中，然后把两个数组中对应下标的元素相加，即2+79，8+27……25+80，并把相应的结果放入第三个数组中，最后输出第三个数组的值。

Answer 1

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

Answer 2

dim a(8),b(8),c(8) ,i as integer
a(0)=2
a(1)=8
a(2)=7
a(3)=6
a(4)=4
a(5)=28
a(6)=70
a(7)=25

b(0)=79
b(1)=27
b(2)=32
b(3)=41
b(4)=57
b(5)=66
b(6)=78
b(7)=80
for i = 0 to 7
c(i)=a(i)+b(i)
next i