首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,窗体如图所示。运行程序时,从考生文件夹数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,同时统计不及格、60~69、70一79、80一89及90一100各分数段的人数,将统计结果显示在相应的文本框
在考生文件夹下有一个工程文件sjt5.vbp,窗体如图所示。运行程序时,从考生文件夹数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,同时统计不及格、60~69、70一79、80一89及90一100各分数段的人数,将统计结果显示在相应的文本框
admin
2017-09-20
17
问题
在考生文件夹下有一个工程文件sjt5.vbp,窗体如图所示。运行程序时,从考生文件夹数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,同时统计不及格、60~69、70一79、80一89及90一100各分数段的人数,将统计结果显示在相应的文本框中。结束程序之前,必须单击“保存”按钮,保存统计结果。
注意:不能修改程序的其他部分和控件属性。程序调试通过后,运行程序,将统计结果显示在文本框中,再按“保存”按钮,否则将没有成绩,最后将修改后的文件按原文件名进行存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,在代码编辑窗口指定位置编写以下代码。 For i=1 To n’循环判断分数的范围,当满足某个条件时则分别统计 If arr(i)<60 Then Text2=Val(Text2)+1 ElseIf arm(i)>=60 And arr(i)<70 Then Text3=Val(Text3) +1 ElseIf arr(i)>=70 And arr(i)<80 Then Text4=Val(Text4)+1 ElseIf arr(i)>=80 And arr(i)<90 Then Text5=Val(Text5)+1 ElseIf arr(i)>=90 And arr(i)<= 100 Then Text6=Val(Text6)+1 End If Textl=Val(Textl)+1’显示统计人数 Next 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/nkGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
若要求输入密码时文本框中只显示“*”号,则应当在文本框的属性窗口中设置______属性。
下列程序段的执行结果为_______。X=5Y=-20IfNotX>0ThenX=Y-3ElseY=X+3PrintX-Y;Y-X
单击命令按钮时,下列程序代码的执行结果为PublicSubProcl(nAsInteger,ByValmAsinteger)n=nMod10m=m\10EndsubPrivateSubComm
下列程序段的结果为______。A="ABBACDDCBA"ForI=6To2Step-2X=Mid(A,I,I)Y=Left(A,I)Z=Right(A,I)Z=X&Y&ZNextIPrintZ
为了使用窗体输出,使Print方法在Form_Load事件中起作用,必须设置窗体的()属性。
当把框架的什么属性设置为False时,其标题会变灰,框架中所有的对象均被屏蔽
在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Timed。要求每一秒在文本框中显示一次当前的时间。程序为:PrivateSubTimerl_______TextTime.text=TimeEndSu
随机试题
关于自旋回波脉冲序列的构成,正确的是
动物发情以后,需要交配刺激才排卵的动物是()。
上颌磨牙与下颌磨牙的区别中哪一点是错误的
()可以设定除限制人身自由、吊销企业营业执照以外的行政处罚。
某新建酒店原定于2004年12月18日开业,可由于工期延误,不得不将开业日期推迟到2005年2月18日,那么在开业前应由()来办理工程竣工验收备案。
某公司2012年度取得境内应纳税所得额120万元,取得境外投资的税后收益59.5万元。境外企业所得税税率为20%,但该企业享受税收优惠,实际税率为15%。我国与该境外企业所在国之间签署了税收协定,在境外减免的税款应视同已缴税额在中国的应纳税额中抵免。该公司
某教师在进行“盐类的水解”一节的教学示范课时,进行了如下教学设计:(1)问题:作为生活中的一个基本常识,大多数人都知道纯碱具有碱性。同学们,请思考Na2CO3水溶液显碱性可能有哪些原因?如何用实验加以验证?(2)讨论猜想:Na2CO3水
疯狂扩散的蓝藻起初并没有使人们感到_______。往年正常情况下,它顶多影响太湖的一些景观。不会带来什么骚乱。雨季一来,这些小生物会被大量的雨水冲刷稀释,人们会渐渐_______它,直到第二年的来临。还有一些农民把它们捞起来当肥料,_______地称之为“
电脑:主板()
Hereisthestoryofrubber.FromtheearliesttimeitwascommonknowledgetothePeruvians(秘鲁人)thatwhenacutwasmadeinthe
最新回复
(
0
)