首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分,某人编写程序如下: Option Base 1 Private Sub Command1_Click() Dim sum As Int
已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分,某人编写程序如下: Option Base 1 Private Sub Command1_Click() Dim sum As Int
admin
2018-09-19
28
问题
已知在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 to 3之间。
转载请注明原文地址:https://jikaoti.com/ti/Ivm0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有下面程序代码:PrivateSubCommand1Click()i=1DoWhilei10Printi=i+2LoopEndSub程序运行时输出字符"*"的个数是
窗体上有1个名称为Command1的命令按钮,事件过程如下:PrivateSubCommand1Click()DimnumAsInteger,xAsIntegernum=Val(InputBox("请输入一个正整数"))
求11+21+……+101的程序如下:PrivateFunctions(xAsInteger)f=1Fori=1Toxf=f*iNextS=fEndFunctionPrivateSubCommand
在VB中,函数过程与子程序过程的区别之一是
设有如下通用过程:PublicSubFun(a0AsInteger,xAsInteger)Fori=1To4x=x*a(i)NextEndSub在窗体上i画一个名称为Text1的文本框和一个名称为Command1的命令按钮,
设有如下程序:OptionBase0PrivateSubFormClick()DimaDimiAsIntegera=Array(1,2,3,4,5,6,7,8,9)Fori=0To3Printa(5-i);Next
下面不属于软件测试实施步骤的是
下列有关通用对话框控件的说法中,正确的是
软件生命周期中的活动不包括( )。
下面的数写成普通十进制数是()。2.65358979335278D-6
随机试题
蛋白质生物合成时:()
孙某,女,54岁。平素体弱多病。近日劳累后出现饮食减少,食后胃脘胀满,嗳气呕恶,面色萎黄,倦怠乏力,大便溏薄,舌淡苔薄白,脉弱。因患者未能坚持服药治疗,一段时间后,出现形寒肢冷,肠鸣腹痛,大便溏泄,受寒加剧,应改用方剂是
耐药结核病的发生包括下列原因
类风湿关节炎最常见的累及关节是
下列行为中,符合银行业从业人员职业操守的是()。
明确提出把建立社会主义市场经济体制作为我国经济体制改革的目标,是()
设Q(x,y)在Dxy平面有一阶连续偏导数,积分∫L2xydx+Q(x,y)dy与路径无关.t恒有2xydx+Q(x,y)dy,(*)求Q(x,y).
接收并阅读由xuexq@mail.neea.edu.cn发来的E-mail,并按E-mail中的指令完成操作。
A.decreasingB.underlinesC.deliveredD.missionsE.becauseF.putoffG.demand
Scotlandisauniqueplace.IthassomeofthemostbeautifulcitiesinEurope,alivingevidenceofa【B1】______andproudpast.
最新回复
(
0
)