早教吧作业答案频道 -->其他-->
VB编程:设有如下两组数据VB编程:设有如下两组数据A:2,7,7,6,27,70,25B:79,27,32,41,57,66,70编写一个程序,把上面两组数据分别读入两个数组中,然后把两个数组中对应下标的元素相加,即2+79,7+27,.,25+
题目详情
VB编程:设有如下两组数据
VB编程:
设有如下两组数据
A:2,7,7,6,27,70,25
B:79,27,32,41,57,66,70
编写一个程序,把上面两组数据分别读入两个数组中,然后把两个数组中对应下标的元素相加,即2+79,7+27,.,25+70,并把相应的结果放入第三个数组中,最后输出三个数组的值
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 Sub
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 Sub
看了 VB编程:设有如下两组数据V...的网友还看了以下:
杭州市的自来水由于增设了加活性炭和加臭氧(O3)两道处理程序,水质处于全国大城市优秀水平.根据以上 2020-05-14 …
将五份含6g碳粉和40g氧化铜的混合物,分别放入密封的容器中隔绝空气加强热.在不同的反应时间里收集 2020-06-27 …
工件加工顺序问题(约翰逊法)五个工件在二台设备加工,加工顺序相同,先在设备1加工,再在设备2加工, 2020-07-26 …
把二次多项式ax2+bx+c设计成一种抽象数据类型题目如下数据部分分为三个系数项,和,操作部分为: 2020-08-03 …
请教数据库问题9、下面的说法正确的是()A、ACCESS数据库具有设置用户口令、给用户授权、和数据加 2020-11-04 …
地铁列车从某一站开往下一站的运动,我们可以将之简化如下:匀加速出站,匀速行驶和匀减速进站,设列车进, 2020-11-20 …
进行科学探究活动,通常需对问题或现象作出假设,然后设计实验或收集证据加以验证.请参照事例(1)完成下 2020-11-21 …
中新社2013年4月18日消息潮阳市按“国际循环经济试验示范区”的发展定位,加快贵屿循环经济产业园区 2020-11-23 …
为了丰富学生的课余生活,学校创设了棋社和文学社,共有300人参加.参加棋社的人数是参加文学社人数的2 2020-11-28 …
某地在“十二五”规划中提出,将加快城镇化进程和社会主义新农村建设,加快生态宜居城乡建设,建设具有岭南 2020-12-01 …