作业帮 > 综合 > 作业

VB编程:设有如下两组数据

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/11/01 08:19:30
VB编程:设有如下两组数据
VB编程:
设有如下两组数据
A:2,7,7,6,27,70,25
B:79,27,32,41,57,66,70
编写一个程序,把上面两组数据分别读入两个数组中,然后把两个数组中对应下标的元素相加,即2+79,7+27,.,25+70,并把相应的结果放入第三个数组中,最后输出三个数组的值
Private Sub Command1_Click()
Dim i As Long
Dim a, b, c
a = Array(2, 7, 7, 6, 27, 70, 25)
b = Array(79, 27, 32, 41, 57, 66, 70)
ReDim c(UBound(a))
For i = 0 To UBound(a)
c(i) = a(i) + b(i)
Next
MsgBox Join(a, ",") & vbCrLf & Join(b, ",") & vbCrLf & Join(c, ",")
End Su