首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sit5.vbp,窗体如图3.25所示。运行程序时,从数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,并统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果湿示在相应的文本框中。
在考生文件夹下有一个工程文件sit5.vbp,窗体如图3.25所示。运行程序时,从数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,并统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果湿示在相应的文本框中。
admin
2016-03-22
79
问题
在考生文件夹下有一个工程文件sit5.vbp,窗体如图3.25所示。运行程序时,从数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,并统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果湿示在相应的文本框中。结束程序之前,必须单击“保存”按钮,保存统计结果。
注意:不能修改程序的其他部分和控件属性。程序调试通过后,运行程序,将统计结果显示在文本框中,再按“保存”按钮保存数据,否则无成绩。最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt5.vbp,在代码编辑窗口的指定位置编写以下代码: 参考代码: Textl.Text=n Courtt1=0 count2=0 count3=0 count4=0 count5=0 Count6=0 For i=1 To n Y=Int(arr(i)/10) Select Case y Case 1 ,2 , 3 , 4 , 5 count1=count 1+1 CaSe 6 count2=count2+1 CaSe 7 count3=count3+1 CaSe 8 count4=count4+1 Case 9,10 count5=count5+1 End Select Next Text2.Text=count1 Text3.Text=count2 Text4.Text=count3 Text5.Text=count4 Text6.Text=count5 步骤2:按
键运行程序,先单击“统计”按钮,再单击“保存”按钮。 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/bMLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
使用驱动器列表框的______属性可以返回或设置驱动器列表中当前选中的磁盘驱动器的索引值。
若在Shape控件内以FillStyle属性所指定的图案填充区域,而填充图案的线条的颜色由FillColor属性指定,非线条的区域由BackStyle属性填充,则应______。
要把一个命令按钮设置成无效,应设置属性______的值为False。
数据处理的最小单位是______。
数据结构中,与所使用的计算机无关的是数据的______。
假定有以下函数过程:FunctionFun(SAsString)AsStringDimslAsStringFori=1ToLen(S)s1=UCase(Mid(S,i,1))+s1
设有如下的用户定义类型:TypeStudentnumberAsStringnameAsStringageAsIntegerEndType则以下正确引用该类型成员的代码是()。
决定一个窗体有无控制菜单的属性是()。
如果将文本框的Locked属性设置为True,则以下说法正确的是
随机试题
Besidesymbolism,allthefollowingqualitiesEXCEPT______arefusedtomakeMelville’sMoby-Dickaworldclassic.
开放性胸外伤的诊断主要依据是()
X线管外壳常用的材料是
荆防败毒散主要用于
男,7岁。因尿少、浮肿入院,体检:两侧眼睑及下肢浮肿,血压150/90mmHg(20.0kPa/12.0.kPa),尿镜检RBC20个/HP,蛋白(+++),血浆白蛋白2.0g/L。最可能的诊断是
某建筑高度为24m的商场,地上5层,建筑面积36000m2,商场设有格栅吊顶,吊顶的通透面积占吊顶总面积的85%。该商场设有湿式自动喷水灭火系统,系统配水支管布置在梁下。该商场设置的自动喷水灭火系统应采用()。
客户评级的评价主体是()。
2018年全国电影总票房为609.76亿元,同比增长9.06%;观影人次为17.16亿人次,同比增长5.93%;放映场次11066.8万场,同比增长17.24%,全国银幕总数达到60079块,其中2018年新增9303块。国产电影市场主体地位更加稳固,总票
你认为是什么问题致使大学论文造假的现象存在的?
A、Trafficinthearea.B、Overheadpowerlines.C、Increasedratesforlocalbusinesses.D、Treeplantingandartwork.A题目问当地社区群体主
最新回复
(
0
)