首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分,某人编写程序如下: Option Base 1 Private Sub Command1_Click() Dim
已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分,某人编写程序如下: Option Base 1 Private Sub Command1_Click() Dim
admin
2020-02-27
53
问题
已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分,某人编写程序如下:
Option Base 1
Private Sub Command1_Click()
Dim sum As Integer
sum=0
For i=1 To 4
For j=1 To 3
sum=sum+score(i,j)
Next j
Print"第"&i&"个学生的总分是:";sum
Next i
End Sub
运行此程序时发现,除第1个人的总分计算正确外,其他人的总分都是错误的,程序需要修改。以下修改方案中正确的是( )。
选项
A、把外层循环语句For i=1 To 4改为For i=1 To 3
内层循环语句For j=1 To 3改为For j=1 To 4
B、把sum=0移到For i=1 To 4和For j=1 To 3之间
C、把sum=sum+score(i,j)改为sum=sum+score(j,i)
D、把sum=sum+score(i,j)改为sum=score(i,j)
答案
B
解析
程序变量sum的值在开始计算第2个学生的总成绩时,仍保留着第一个学生的总成绩,这样会把前面学生的总成绩计算进去,显然不对。因此,sum=0这一句应该放在第1层For循环体的第一句,即For i=1 to 4和for.j=1 to3之间。
转载请注明原文地址:https://kaotiyun.com/show/EXTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下数组定义语句中,错误的是( )。
如果要定义一个窗体级变量,定义变量语句的位置应该是
以下关于局部变量的叙述中错误的是()。
设有如下程序:PrivateSubForm_Click()ClsForn=1To100IfNot(n/3=Int(n/3)OrnMod8=0)Then
考生文件夹中有工程文件sjt3.vbp。程序运行时,单击窗体,则开始每隔5秒钟在文本框中显示一次当前时间,文本框中文字的颜色每隔8秒在红色(颜色值为&HFF)与黑色(颜色值为0)之间切换。在给出的窗体文件中已经有了全部控件,但程序不完整。要求:去
下列选项中不属于结构化程序设计原则的是( )。
语句Dima(-3To4,3To6)AsInteger定义的数组的元素个数是( )。
在考生文件夹下有一个工程文件sit5.vbp,在该工程文件中已经定义了一个学生记录类型数据StudType。有三个标题分别为“学号”、“姓名”和“平均分”的标签;三个初始内容为空,用于接收学号、姓名和平均分的文本框Text1、Text2和Text3:一个用
下列关于通用对话框CommonDialog1的叙述中,错误的是()。
层次型、网状型和关系型数据库划分原则是( )。
随机试题
患者女性,44岁,一年来心悸气短,消瘦,怕热,烦躁多梦,颈部均匀肿大,清晨测P110次/分,血压120/70mmHg(16/9kPa),131I摄取量2h30%。经内科治疗8周后,脉率90次/min以下,情绪稳定,体重增加,BMR+15%,目前最好的对
某男,60岁,发作性胸骨后闷痛5天,突发剧烈胸痛2小时,伴恐惧、濒死感,含服硝酸甘油不能缓解。既往有高血压病史20余年,吸烟史30年,20支/天。查体:P90/分,BP140/80mmHg,急性病容伴大汗,面色苍白,双肺无干湿哕音,心音低钝,律整,未闻及杂
病毒性心肌炎体征不符的是
医疗机构优先选用的抗菌药物品种应选自
个人征信查询系统中,涵盖了信用卡与贷款的明细等情况的是()。
美国教育心理学家奥苏伯尔强调学生学习的主要形式是()。
既有固定汇率制的可信性又有浮动汇率制的灵活性的汇率制度是()。
设3阶矩阵A的特征值为2,3,λ.若行列式|2A|=-48,则λ=________.
属于C语言中合法的常量是______。
A、He’sgoingtohelpthewomanbakehercake.B、Heisgoingtogetamopandcleanthefloor.C、Heisgoingtosweepthekitchen
最新回复
(
0
)