首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分,某人编写程序如下: Option Base1 Private Sub Command1_Click() Dim sum As Intege
已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分,某人编写程序如下: Option Base1 Private Sub Command1_Click() Dim sum As Intege
admin
2016-12-13
29
问题
已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分,某人编写程序如下:
Option Base1
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=1To 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清零,否则上一行的累加计算结果将会在下一行继续累加,造成结果不正确。
转载请注明原文地址:https://jikaoti.com/ti/oXy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面程序段的作用是从文本框中输入数据,如果该数据满足条件:除以6余2,除以5余3,则输出,否则,将焦点定位在文本框中,并清除文本框的内容。请填空。PrivateSubCommandlClick()num=Val(Textl.Tex
数据管理技术发展过程经过人工管理、文件系统和数据库系统3个阶段,其中数据独立性最高的是__________阶段。
关于MDI窗体,下列说法正确的是()。
下列程序的输出图形是()。Fork=0To360cr=Int(160*Rnd)ang=-3.1415926/180*kCircle(2000,2000),500,cr,0,angNext
下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整。PrivateTypeAngKAsInteger
在窗体上建立通用对话框需要添加的控件是()。
窗体上有两个文本框Textl、Text2以及一个命令按钮Commandl,编写下列程序:DimYAsIntegerPrivateSubCommandlClick()DimXAsIntegerx=2Text1.Tex
如果一个变量未经定义就直接使用,则该变量的类型为()。
结构化程序设计的3种基本结构是()。
随机试题
(2012年)根据成本推进型通货膨胀理论,导致利润推进型通货膨胀的因素是()。
下列函数在区间(一∞,+∞)上单调减少的是
下颌舌骨嵴前方,口底上升时的最高点下颌颊系带后部与嚼肌下段前缘之间,可承受较大力
A.牙源性颌骨囊肿B.发育性囊肿C.阻塞性囊肿D.牙源性肿瘤E.孤立性囊肿第二鳃裂囊肿属于
患者,男,56岁。近1个月来始有左侧舌根、软腭及咽部阵发性剧烈疼痛,并向外耳道放射。吞咽、说话均可引起疼痛,甚至夜间有疼醒现象,临床检查以上部位未见明显肿胀.黏膜色正常无溃疡,服用卡马西平有效。最有可能的原因是
风险管理的最基本要求是()。
下列关于量本利分析基本假设的表述中,不正确的是()。
协调外交
Sincethetwosculpturesare______,onemustbeareplicaoftheother.
Everyotherweekitseemsanewstudycomesoutthataddstoouralready-formidablestoreofparentalworries.Butevenbythose
最新回复
(
0
)