2. 计算机
  3. 已知在4行3列的全局数组score(4，3)中存放了4个学生3门课程的考试成绩(均为整数)。 现需要计算每个学生的总分，某人编写程序如下： Option Base 1 Private Sub Command 1 Click() Dim SHIn As

已知在4行3列的全局数组score(4，3)中存放了4个学生3门课程的考试成绩(均为整数)。 现需要计算每个学生的总分，某人编写程序如下： Option Base 1 Private Sub Command 1 Click() Dim SHIn As

admin2020-04-18  77
问题 已知在4行3列的全局数组score(4，3)中存放了4个学生3门课程的考试成绩(均为整数)。
现需要计算每个学生的总分，某人编写程序如下：
Option Base 1
Private Sub Command 1 Click()
Dim SHIn As Integer
Sum=0
For I=1 To 4
Forj=1 To 3
sum=sum+score(i，j)
Nextj
Print"第"＆i&"个学生的总分是："；sum
Next i
End Sub
运行此程序时发现，除第1个人的总分计算正确外，其他人的总分都是错误的，程序需要修改。以下修改方案中正确的是
选项 A、把外层循环语句For i=l To 4改为For i=1 To 3内层循环语句Forj=1 To 3改为Forj=1 To 4
B、把sum=0移到For i=1 To 4和Forj=1 To 3之间
C、把sum=sum+score(i，j)改为sum=sum+score(j，i)
D、把sum=sum+score(i，j)改为slim=score(i，j)
答案B
解析 本题考查的考点是有关循环求和和二维数组的。本题要对二维数组的每行进行累加求和，每计算新的一行就应该将累加和变量sum清零，否则上一行的累加计算结果将会在下一行继续累加，造成结果不正确。
转载请注明原文地址:https://www.kaotiyun.com/show/2iTp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)